A 

? 

CJKDIBO 11/236 SLU LTC REPR OIAG 
JKOIBO.Pll 24-MAR-86 0<»:57 

1 
2 
3 
4 

5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 



MACYll 30(1046) 24-MAR.86 10:44 PAGE 2 



SEO 0001 



.REM 4 



IDENTIFICATION 



PRODUCT CODE 
PRODUCT NAME 
PRODUCT DATE 
MAINTAINER: 



AC-T052B-MC 

CJKDIBO 11/238 SLU LTC REPAIR 
MARCH-86 

MSD DIAGNOSTIC ENGINEERING 



THE INFORMATION IS THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN TK.S 
DOCUMENT. 



NO RESPONSIBILITY IS ACSUMEO FOR THE USE OR RELIABILITY OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANlf-.S. 

COPYRIGHT (C): 1982, 1986 BY DIGITAL EQUIPMENT CORPORATION 
THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 



DIGITAL 
DEC 



POP 
DECUS 



UNIBUS 
DECTAPE 



MASSBUS 
DEC/Xll 
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|3 1.0 GENERAL PROGRAM INFORMATION 

85 1.1 ABSTRACT 
86 

87 THIS PROGRAM TESTS BOTH SERIAL LINE UNITS (SLU'S) AND THE LINE TIME 

88 CLOCK (LTC) ON THE M8189 MODULE. ITS MAIN PURPOSE IS TO PROVIDE SCOPE 

89 LOOPING FOR REPAIR PERSONNEL. 
29 TYPE-OUTS IDENTIFY A FUNCTION 

li BEING DONE OR A FUNCTION THAT FAILED AND TO WHAT LCGxCAL PORTION OF 

11 THE BOARD IT FAILED ON (I.E., TRIED TO SET BIT 6 ON CSR OF SLUl). 

93 THIS PROGRAM IS BASICALLY A REWRITE OF THE DLll-W DIAGNOSTIC AND 

9* THEREFORE IS WRITTEN IN MACRO- 11 USING THE SYSMAC MACRO PACKAGE. IT 

H IS COMPATIBLE WITH ALL EXISTING MANUFACTURING AND FIELD SERVICE AUTO- 

96 MATED TEST SYSTEMS. 
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1.2 SYSTEM REQUIREMENTS 

A. HARDUARE REQUIREMENTS 

- 11/23B CPU MODULE 

- MINIMUM 8K OF MEMORY 

- TURN AROUND JUMPER INSTALLED ON SLU2 

8. SOFTUARE ENVIRONMENTS 

- XXDP STAND-ALONE 

- XXDP CHAIN MODE 

- APT 

1.3 RELATED DOCUMENTS AND STANDARDS 

- DIAGNOSTIC ENGINEERING FUNCTIONAL SPECIFICATION FOR 11/24 ON 
BOARD OPTIONS TEST 

BGI-79-004-00-U 

- STANDARD APT SYSTEM TO PDP-11 DIAGNOSTIC INTERFACE REV. 15 

16-FEBRUARY-76 APT SYSTEM GROUP 

- DIAGNOSTIC ENGINEERING STANDARDS AND CONVEN'^IONS 

175-003-009-02 

1.4 PREREQUISITE DIAGNOSTICS 

THIS PROGRAM ASSUMES THE CORRECT OPERATION OF THE CPU INSTRUCTION SET. 
THIS IS TO BE VERIFIED BY EITHER: 

CJKDBXX DCFll-AA CPU DIAGNOSTIC 
OR 

CJKDEXX Fll QUICK TEST 

1.5 ASSUMPTIONS 

IT IS ASSUMED THAT THE CONSOLE DEVICE THAT IS CONNECTED TO SLUl IS OP 
ERATING CORRECTLY. IF THE TERMINAL IS NOT OPERATING CORRECTLY FALSE 
INDICATIONS CAN BE EXPECTED. 



2.0 OPERATING INSTRUCTIONS 

2.1 LOADING AND STARTING PROCEDURES 

USE STANDARD PROCEDURE FOR PDP-11 ABSOLUTE BINARY FORMATTED TAPES. 



SEQ 000£ 



Fi 



CJKDIBO 11/238 SLU LTC REPR DIAG 
JKDIBO.Pll 24-MAR-86 09:57 

154 
155 
156 
157 
156 
159 
160 
161 
162 
163 
164 
165 
166 
167 
168 
169 
170 
171 
172 
173 
174 
175 
176 
177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 



207 
208 
209 



MACYll 30(1046) 24 MAR-86 10:44 PAGE 6 



2.1.1 STARTING PROCEDURE - 

LOAD THE SWITCH REGISTER UITH SETTING (SOFTWARE SWITCH REGISTER LOCA 
TION - 176) 

A START AT 200 

AFTER CHECKING THE TRANSMITTER, THE PROGRAM WILL PRINT ITS 
IDENTIFICATION AND REPORT THE NUMBER OF DEVICES UNDER TEST 
(NUMBER IS OCTAL). "END PASS" IS PRINTED AFTER A FULL PASS 
HAS BEEN MADE ON ALL DEVICES UNDER TEST. 

B. START AT 204. ****N0TE**** 

THE "ECHO" TEST WILL BE EXECUTED. AN "*" IS PRINTED AT THE 
BEGINNING OF THE TEST. THE ECHO TEST READS A CHARACTER FROM 
THE TERMINAL. WRITES THAT CHARACTER TO THE TERMINAL, AND RE- 
PORTS ANY ERROR FLAGS SET IN THE RECEIVER BUFFER. A 
CONTROL-C (tC) HALTS THE TEST AND PRINTS "STOP" AT THE TERMI 
NAL CONTINUING RESTARTS THE ECHO TEST. 



SEQ 0005 



START AT 210. 



****N0TE**** 



THE TERMINAL OUTPUT TEST WILL BE EXECUTED. DEPRESSING ANY 
CHARACTER AT THE TERMINAL HALTS THE TEST. CONTINUING RES- 
TARTS THE TEST. THE TEST OUTPUTS 32 CHARACTERS ON A LINE AM) 
REPEATS THE PATTERN EVERY THREE LINES. THE PATTERN IS AS 
FOLLOWS (OCTAL CODE 040 --> 377): 



THIS BOTTOM LINE COULD BE THE FOLLOWING IF THE TERMINAL 
NOT HAVE LOWER CASE: 

aABCDEFGHIJKLHNOPQRSTUVWXYZ[ [UPPER CASE ALPHA] 



D0C5 



2.2 PROGRAM OPTIONS 



191 


BIT15 




HALT ON ERROR 


192 


BIT14 




SCOPE LOOP 


193 


BIT13 




INHIBIT ERROR TYPEOUT 


194 


BIT12 




UNUSED 


195 


BITll 




UNUSED 


xX, 


BITIO 




INHIBIT ERROR FLAGS TEST 


197 


BIT09 




LOOP ON ERROR 


198 


BIT08 




UNUSED 


199 


BIT07 




DISABLE SLU2 DATA TEST 


200 


BIT06 




INHIBIT LTC TESTS 


201 


BIT05 




INHIBIT ALL SLU TESTS (BOT ' _US) 


202 


BIT04 




INHIBIT SLUl TESTING 


203 


BIf03 




INHIBIT SLU2 TESTING 


204 


BIT02 




UNUSED 


205 


BITOl 




UNUSED 


206 


BITOO 




UNUSED 



BUILT INTO THE PROGRAM IS THE ABILITY TO DYNAMICALLY CHANGE THE CON- 
TENTS OF THE SOFTWARE SWITCH REGISTER DURING EXECUTION. TO DO THIS 



Gl 
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THE OPERATOR MUST TYPE A "CNTL G" (TYPING A "G" UITH THE "CTRL" KEY 
HELD DOWN AT THE SAME TIME). THIS IS PROCESSED AT KEY TIMES DURING 
THE PROGRAM (I.E. ON ERRORS. IN BETWEEN EACH TEST). A PROBLEM CAN 
OCCUR SINCE THE PRCX3RAM MAY BE TESTING THE SLU CONNECTED TO THE CW- 
SOLE DEVICE . IF THIS HAPPENS IT SHOULD NOT CAUSE AN ERROR BUT THE 
"CNTL 6" MAY BE LOST, SO IF Tf€ PROGRAM DOES NOT RESPOND TO THE FIRST 
TYPE A FEW MORE UNTIL THE RESPONSE IS RECEIVED. WHEN THE 
IS RECEIVED THE PROGRAM WILL RESPOND WITH: 



SEQ 0006 



"CNTL G' 
"CNTL G' 



SWR - XXXXXX 



NEW 



WHERE XXXXXX IS EQUAL TO THE PRESENT 
OCTAL. THE OPERATOR CAN THEN TYPE; 



SWITCH REGISTER CONTENTS IN 



1. <CR> IF NO CHANGES ARE TO BE MADE. 

2. 6 DIGITS <CR> TO REPRESENT IN OCTAL THE NEW SWITCH REGISTER 
SETTING. 

3. CONTROL-U IF THE OPERATOR MAKES AN ERROR WHILE INPUFING THE 
NEW SWITCH REGISTER SETTING. 



2.3 EXECUTION TIMES 

1ST PASS RUNTIMEC WORST CASE) 15 SECONDS 

LONGEST TEST TIME 12.5 SECONDS 

ADDITIONAL RUN TIMEC EXTRA UNITS) NONE 

LONGEST PASS TIME 15 SECONDS 



3.0 ERROR INFORMATION 



3.1 ERROR REPORTING PROCEDURES 

IF A ROUTINE FAILS AND THE INHIBIT ERROR TYPEOUT (BIT13) OF THE SWR IS 
NOT SET. A PRINTOUT RESULTS IN THE FORM: 

"CSOME ASCII MESSAGE)" 
TEST ERR PC RCSR [ANY APPLICABLE DATA HEADINGS] 
XXXXXX XXXXXX XXXXXX [ANY APPLICABLE DATA] 

NOTE: "RCSR" IS DEPENDENT ON THE FAILURE THEREFORE 
COULD BE TCSR, RBUF. TBUF, OR LKS 

WHERE "XXXXXX" IS AN OCTAL NUTCER. 

THIS ERROR PRINTOUT OCCURS PROVIDED THE ERROR THAT EXISTS WOULD NOT 
HINDER THE TYPEOUT. IN CASES WHERE IT IS NOT POSSIBLE TO PRINT AN 
ERROR MESSAGE (I.E. FATAL CONSOLE TRANSMITTER FAILURES). A HALT 
OCCURS. (SEE SECTION 3.2 FOR ERROR HALT INFORMATION.) 



HI 
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NOTE 

FOR SOFTWARE SWITCH OPERATION. THE 
SWITCH REGISTER CAN BE HANGED BY TYPING 
A CONTROL -G AT THE CONSOLE DURING ERROR 
PRINTOUTS. AFTER CONTINUING FROM THE 
ERROR HALT THE OLD SWR CONTENTS IS DIS- 
PLAYED AND THE NEW CONTENTS CAN BE EN- 
TERED. IF ERROR HALTS ARE DISABLED. THE 
CONTROL -G RESPONSE OCCURS IMMEDIATELY 
FOLLOWING THE TYPEOUT. 



3.2 ERROR HALTS 

THERE ARE 4 ERRORS IN THIS PROGRAM THAT CAUSE A HALT. 
ARE IN TESTS 1. 2. AND 3. 



SEQ 0007 



THESE ERRORS 



TEST 1 ERROR - ACCESS TO SLUl TRANSMITTER CSR CAUSE TIME-OUT TRAP. 

THIS PROBLEM WILL PROBABLY CAUSE AN INABILITY OF THE 
MICRO -OCT TO RUN. 



TEST 2 ERROR 



ACCESS TO SLUl TRANSMITTER DATA BUFFER CAUSED TIME-OUT 
TRAP. IHIS PROBLEM WILL PROBABLY CAUSE AN INABILITY OF 
THE MICRO- OOT TO RUN. 



TEST 3 ERROR - Tf€ FIRST ERROR IS THAT DONE DID NOT aEAR WHEN THE 
TRANSMITTER BUFFER WAS FILLED AS IT SHOULD. 

THE SECOND ERROR INDICATES THAT DONE DID NOT RESET IN A 
REASONABLE TIME AFTER THE DATA BUFFER WAS FILLED. INDI- 
CATING THAT THE CHARACTER WAS NEVER TRANSMITTED. THIS 
COULD CAUSE MICRO-OOT TO NOT RUN OR GARBLED OUTPUT FROM 
THE MICRO-OOT. 



4.0 PERFORMANCE AND PROGRESS REPORTS 

THE ONLY REPORT FROM THIS PROGRAM OTHER THAN ERROR REPORTS IS THE END 
PASS MESSAGE. IT IS IN THE FORM: 

END PASS XXXXXX 

WHERE XXXXXX IS THE DECIMAL NUMBER OF END OF PASSES COMPLETED. 



II 
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5.0 DEVICE INFORMATION TABLES 

SLUl RCSR 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 

I i "i "i I 

I I 
I I 

I 



SEQ 0008 



RECEIVER DONE 

RECEIVER INTERRUPT ENABLE 



SLUl RBUF 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 



I I I I I 



IIIIIIIII 



III 

III 
ERROR- I I 
OVERRUN --- I 
FRA.ME ERROR - — 

RECEIVE PARITY 

ERROR 

RECEIVED DATA BITS (8) 



SLUl XCSR 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 



III 



I I 



TRANSMITTER READY 

TRANSMITTER INTERRUPT ENABLE 
BREAK 



I I 
I 



I 
I 
I 



SLUl XBUF 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 



IIIIIIIII 



TRANSMITTER DATA BITS (8) 



I 
I 



Jl 
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LTC CSR 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 



SEQ 0009 



INTERRUPT ENABLE 



SLU2 RCSR 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 

I i I 

I I 

RECEIVER DONE I 

INTERRUPT ENABLE 



SLU2 RBUF 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 



I I I I I 



IIIIIIIII 



III 

III 
ERROR - I I 
OVERRUN --- I 
FRAME ERROR — 
RECEIVER PARITY — 
ERROR 

RECEIVER DATA BITS (8) 



SLU2 XCSR 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 

I i'T'i 

TRANSMITTER DONE I J 

INTERRUPT ENABLE I 

BREAK 



Kl 
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SLU2 XBUF 

15 14 13 12 11 10 9 8 7 



I 
I 



TRANSMITTER DATA BITS (8) 



6.0 PROGRAM DESCRIPTION 



6.1 PROGRAM EXECUTION CHARACTERISTICS 

THIS PROGRAM TESTS ALL THE SELECTED DEVICES AS A SINGLE UNIT. IT 
FIRST VERIFIES THAT ALL REGISTERS CAN BE ACCESSED, THE URITEABLE BITS 
ARE ABLE TO BE WRITTEN TO AND ARE UNIQUE ON ALL THREE DEVICES. IT 
THEN CHECKS EACH DEVICE FOR INTERRUPTS AND FOR DATA RELIABILITY. 
FINALLY IT SETS ALL SELECTED DEVICES UP TO GO AT THE SAME TIfC ENABLES 
INTERRUPTS AND STARTS IHEM OFF. THIS TEST CHECKS SYSTEM INTERACTION. 
WHEN ALL TESTS HAVE BEEN COMPLETED THE END OF PASS MESSAGE IS TYPED. 



6.2 SUBTEST SUMMARIES 
TESTl 



TEST2 



TEST3 



TEST ABILITY TO ACCESS SLUl TRANSMITTER CQNTRX 
REGISTER. HALTS IF ACCESS CAUSES TIME OUT TRAP. 

TEST ABILITY TO ACCESS SLUl TRANSMITTER BUFFER. 
ACCESS CAUSES TIME-OUT TRAP. 



AND STATUS 



HALTS IF 



TEST4 



TEST5 



TEST SL'Jl TRANSMITTER BIT7 (DONE) CLEARS UHEN TRANSMITTER 
BUFFER IS LOADED. THE BUFFER IS LOADED UHICH SHOULD aEAR 
THE DONE BIT, AFTER IT IS VERIFIED THAT "DONE- CLEARS THE 
PROGRAM UAITS TO RECEIVE DONE BACK AFTER THE DATA IS TRANS- 
FERRED OUT OF THE BUFFER. IF DONE DOES NOT INITIAUY aEAR 
OR FAILS TO RESET THE PROGRAM HALTS. 

TEST THAT SLUl TRANSMITTER BIT7 (DONE) SETS WITH RESET. THE 
TRANSMITTER BUFFER IS LOADED WITH A CHARACTER, AS SOON AS 
"DONE" SETS A SECOND CHARACTER IS LOADED INTO THE BUFFER. 
BECAUSE THE FIRST CHARACTER IS STILL BEING SHIFTED OUT OF 
THE UART "DONE- UILL NOT NORMALLY SET FOR AT LEAST 1 MS (DE- 
PENDING ON BAUD RATE). THE PROGRAM ISSUES A RESET BEFORE 
THE TIME IS UP AND IMMEDIATELY CHECKS FOR "DONE". IF IT IS 
SET THE PROGRAM ASSUMES IT WAS SET BY THE RESET INSTRUCTION. 
THIS ERROR DOES NOT CAUSE A HALT. 

TEST ABILITY TO ACCESS SLUl RECEIVER CONTROL AW STATUS RE- 
GISTER. AN ERROR IS REPORTED IF ACCESS CAUSES A TIME-OUT 



SEQ 0010 



LI 
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490 






491 






492 




TEST6 


493 






494 






495 






4% 




TESTIO 


497 






498 






499 






500 






501 




TEST7 


502 






503 






504 




TESTIO 


505 






506 






507 






508 




TESTll 


50*^ 






51" 




TEST12 


511 






512 




TEST13 


513 






514 




TEST14-16 


515 






516 




TEST17 


517 






518 






519 




TEST20-21 


520 






521 




TEST22 


522 






523 






524 






525 






526 






527 






528 




TEST23 


529 






530 




TEST24 


531 






532 






533 




TEST25 


534 






535 






536 






537 




TEST26 


538 






539 






540 






541 






542 




TEST27 


543 




544 






545 
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TRAP. 



SEO 0011 



TEST ABILITY TO ACCESS SLUl RECEIVER BUFFER. 
REPORTED IF ACCESS CAUSES A TIME-OUT TRAP. 



AN ERROR IS 



TEST THAT SLUl TRANSMITTER INTERRUPT ENABLE (BIT6) CAN BE 
SET AND RESET. THIS TEST CHECKS THAT THE BIT CAN BE WRITTEN 
INTO AND READ. CLEARED BY URITING A ZERO TO IT AND CLEARED 
BY A "RESET". 

TEST THAT SLUl RECEIVER INTERRUPT ENABLE (BIT6) CAN BE SET 
AND RESET. SAME TEST AS FOR TRANSMITTER INTERRUPT ENABLE. 

TEST THAT SLUl BIT6 OF RECEIVER CSR CAN BE SET AND RESET. 
PERFORM BIS (BIT SET) AND BIC (BIT CLEAR) ON THE RCSR. 
AN ERROR HERE CAUSES AN ERROR PRINT OUT TO TERMINAL. 

SAME AS TESTl BUT DONE ON SLU2 AND ERROR DOES NOT CAUSE HALT. 

SAME AS TEST2 BUT FOR SLU2 AND ERROR DOES NOT CAUSE HALT. 

SAME AS TEST3 BUT FOR SLU2 AND ERROR DOES NOT CAUSE HALT. 

SAME AS TEST4-6 BUT FOR SLU2. 

TEST SLU2 BREAK BIT (BITO) CAN BE SET. CLEARED. AND RESET. 
PERFORM BIS. BIC AND BIT ON SLU2 TCSR. 

SAME AS TEST 7-10 BUT FOR SLU2. 

TEST THAT SLU2 RCVR DONE BIT (BIT7) SET AND CLEAR PROPERLY. 
WITH A LOOP BACK CONNECTOR PLACED ON SLU2. THE CODE UILL LOAD 
THE TRANSMIT BUFFER WO EXPECT TO RECEIVE DATA IN THE RECEIVER 
BUFFER. A CORRECT RESULT UILL CAUSE THE RCSR DONE BIT TO BE SET. 
THE TEST UILL ALSO PERFORM A RESET INSTRUCTION AND TEST THAT THE 
RCSR DONE BIT 7 IS CLEARED. 

TEST SLU2 THAT READING THE RBUF CLEARS THE RECEIVER DONE BIT 7. 

TEST ABILITY TO ACCESS LINE aOCK STATUS REGISTER. ERROR 
REPORTED IF ACCESS CAUSES TIME-OUT TRAP. 

TEST THAT LINE CLOCK INTERRUPT ENABLE (BIT6) CAN BE SET. 
CLEARED, AND "RESET". THIS TEST PERFORMS THE BIT. BIC AND BIS 
INSTRUCTIONS ON BIT 6 OF THE LKS. 

UNIQUE INTERNAL ADDRESS TEST. THIS TEST URITES A BIT INTO 
ONE OF THE DEVICE REGISTERS AND THEN VERIFIES THAT BIT IS 
NOT SET IN OTHER REGISTERS. THE TEST IS REPEATED FOR OTHER 
REGISTERS. 

TEST THAT SLUl TRANSMITTER INTERRUPTS ONLY UHEN ENABLED. 
THIS TEST CHECKS THAT THE TRANSMITTER ONLY INTERRUPTS UHEN 
ITS INTERRUPT ENABLE BIT IS SET. 



Mi 
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TEST30 TEaT SLUl TRANSMITTER INTERRUPTS DO NOT OCCUR WHEN DISABLED. 

THIS TEST CHECKS THAT THE TRANSMITTER DOES NOT INTERRUPT 
UHEN THE PROCESSOR PRIORITY IS 7 OR THE INTERRUPT ENABLE BIT 
IS CLEARED. 

TEST31 TEST SLUl TRANSMITTER FOR DOUBLE INTERRUPTS. THIS TEST 
FIRST CHECKS THAT THE TRANSMITTER CAN INTERRUPT THEN MAKES 
SURE THAT ONLY ONE INTERRUPT IS REQUESTED FOR EACH SETTING 
OF "DONE". 

TEST32 TEST THAT SLUl TRANSMITTER INTERRUPT CLEARS UITH LOADING OF 
TRANSMITTER BUFFER. THIS TEST PUTS THE PROCESSOR AT 7, SETS 
TRANSMITTER INTERRUPT ENABLE AND FILLS THE TRANSMITTER 
BUFFER. WHEN "DONE" SETS THE SLU SHOULD HAVE AN INTERRUPT 
PENDING. THE PROGRAM THEN FILLS THE BUFFER AGAIN UHICH 
SHOULD CLEAR THE INTERRUPT. 

TEST33-36 SAME AS TESTS 27-32 EXCEPT FOR SLU2 INSTEAD OF SLUl. 

TEST37-41 SAME AS TESTS 27-31 EXCEPT FOR SLU2 RECEIVES INSTEAD OF 
SLUl TRANSMITTER. 

TEST42 TEST THAT SLU2 RECEIVER INTERRUPT CLEARS BY REAOIX RBUF. 

THIS TEST SETS THE PRIORITY AT 7, SETS RCVR INTEPRUPT ENABLE 
AND FILL THE TBUF. UHEN "DONE" SETS. RBUF WILL ATTEMPT TO aEAR 
THE INTERRUPT BY READING THE BUFFER. 

TEST43 TEST SLU2 THAT RESET CLEARS RECEIVE INTERRUPT. THIS TEST SLTS 
THE PRIORITY TO 7. SETS RCVR INT ENABLE AND THEN UAITS FOR RCV 
DONE. UHEN "DONE" SETS. A RESET INSTRUCTION IS EXECUTED. 
AN ERROR IS REPORTED IF THE RECEIVER INTERRUPT IS NOT aEARED. 

TEST44 TEST SLU2 THAT "OVERRUN 6 ERROR" BITS CAN BE SET. THIS TEST 
SENDS THREE CHARACTERS TO THE RCVR ONE AT A TIME. BIT14 OF 
THE RBUF IS CHECKED FOR OVERRUN. IF IT IS NOT SET AN ERROR 
IS SET, BIT 15 (ERROR BIT) IS THEN CHECKED TO VERIFY THAT 
AN ERROR HAS OCCURRED. 

TEST45 TEST THAT BREAK TRANSMITS ALL ZEROS. PUT ALL ONES INTO RE- 
CEIVER BUFFER THEN ISSUE A BREAK THF RECEIVER BUFFER SHOULD 
CONTAIN ZEROS. 

TEST46 TEST THAT FRAMING ERROR (BIT13) CAN BE SET DURING BREAK. 

TRANSMIT A BREAK AND A CHARACTER JUST TO LET US KNOW UHEN TO 
LOOK FOR THE ERROR BIT. UHEN RECEIVER "DONE" SETS BOTH 
BREAK AND CHARACTER SHOULD BE THERE, CHECK FOR BIT 13 IN RE- 
CEIVER STATUS REGISTER. 

TEST47 TEST SLU2 DATA PATH USING WRAP CABLE COMCCTOR. THIS TEST 
TRANSMITS A BINARY COUNT PATTERN ONE BIT AT A TIME. THE 
TEST THEN VERIFIES THE DATA AGAINST UHAT IT EXPECTED TO RECEIVE. 
ERRORS ARE REPORTED TO THE TERMINAL. 

TEST50 TEST LINE TIME CLOCK INTERRUPTS PROPERLY. 

TEST51 TEST LINE TIME CLOCK FOR DOUBLE INTERRUPTS. 



SEQ 0012 



Nl 
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602 

603 

604 

605 

606 

607 

608 

609 

610 

611 

612 

613 

614 

615 

616 

617 

618 

619 

620 

621 

622 

623 

624 

625 

626 

627 

628 

629 

630 

631 

632 

633 

634 

635 

636 

637 

638 

639 

640 

641 

642 

643 

644 

645 

647 
648 
649 

650 

651 104401 

652 104402 

653 104403 

654 104404 

655 104405 

656 104406 

657 104407 
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TEST52 TEST THAT LINE TIME CLOCK INTERRUPT CLEARS UITH RESET. 

TEST53 BLAST TEST. THIS TEST RUNS ALL SELECTED DEVICES SIMULTANE- 
OUSLY IN INTERRUPT MODE. AFTER 60 INTERRUPTS FROM THE LINE 
CLOCK OR 256 (10) BYTES HAVE BEEN TRANSFERRED BY THE SLU' S 
EVERYTHING IS SHUT DOUN. THE PROGRAM THEN VERIFIES THAT NO 
INTERRUPTS WERE LOST ON EITHER SLU AND THAT THE DATA TRANS- 
FERRED UAS CORRECT. 

NOTE: IF RUNNING UNDER THE APT ENVIROftlENT MANY OF THE ABOVE TESTS ARE 
ONLY EXECUTED DURING FIRST PASS. 

6.3 SPECIAL SUBROUTINE DESCRIPTIONS 

6.3.1 ECHO TEST 

THIS ROUTINE WILL ECHO ANY CHARACTER TYPED ON EITHER SLUl OR SLU2. 
DEFALLT IS TO THE CONSOLE DEVICE SLUl. THE TEST IS HALTED BY TYPING A 
CONTROL -C. TEST CAN BE RESTARTED AFTER HALTING BY JUST CONTINUING. 

6.3.2 TERMINAL OUTPUT TEST - 

THIS ROUTINE WILL OUTPUT ALL URITEABLE CHARACTERS FOR THE OCTAL CODE 
040 --> 377. 32 CHARACTERS ARE PRINTED ON EACH LINE. THE PATTERN IS 
REPEATED EVERY THREE LINES. 



7.0 LISTING 



.TITLE CJKDIBO 11/23B SLU LTC REPR DIAG 

.•♦COPYRIGHT (C) SEPT-81. MARCH-86 

:*DIGITAL EQUIPMENT CORP. 

!*MAYNARD, MASS. 01754 

J* 

;* 

s*THIS PROGRAM UAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 

;*PACKAGE (MAINDEC-11-DZQAC-C5), JAN. 1981. 

:* 

.ENABLE A6S.AMA 



TYPE-104401 
TYPOC-104402 
TYPOS- 104403 
TYPON- 104404 
TYPDS- 104405 
GTSUR-104406 
CKSUR-104407 



SEQ 0013 



B2 
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658 

659 

660 

661 

662 

663 

664 

665 

666 

667 

668 

669 

670 

671 

672 

673 

674 

675 

676 

677 

678 

679 

680 

681 

682 

683 

684 

685 

686 

687 

688 

689 

690 

691 

692 

693 

694 

695 

6% 

697 

698 

699 

700 

701 

702 

703 

704 

705 

706 

707 

706 

709 

710 

711 

712 

713 



104410 
104411 
000021 
000023 
000001 
160000 
000000 
000001 



001100 



000011 
000012 
000015 
000200 
177776 

177774 
177772 
177570 
177570 



000000 
000001 
000002 
000003 
000004 
000005 
000006 
000007 
000006 
000007 



000000 
000040 
000100 
000140 
000200 
000240 
000300 
000340 



100000 
040000 
020000 
010000 
004000 
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RDCHR-104410 

RDLIN-104411 

$XDN-000021 

♦XOFF-000023 

»TN-1 

$SUR- 160000 
$SURMRK -000000 
$TN-1 



SEQ 0014 



};HALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT 



.SBTTL BASIC DEFINITIONS 

;*INITIAL ADDRESS OF THE STACK POINTER *** 1100 
STACK" 1100 

.EQUIV EnT, ERROR ; t BASIC DEFINITION OF ERROR CALL 

.EQUIV lOT. SCOPE BASIC DEFINITION OF SCOPE CALL 



; ♦MISCELLANEOUS DEFINITIONS 

CODE FOR HORIZONTAL TAB 
CODE FOR LINE FEED 
CODE FOR CARRIAGE RETURN 
CODE FOR CARRIAGE RETURN-LINE FEED 
t (PROCESSOR STATUS UORO 



HT 
LF 
CR 

CRLF. 
PS- 
.EQUIV 
STKLMT 
PIRQ- 
DSUR- 
DOISP- 



11 
12 
15 
200 
177776 
PS,PSU 
177774 
177772 
177570 
17-'570 



n STACK LIMIT REGISTER 
PROGRAM INTERRUPT REQUEST REGISTER 
HAROUARE SUITCH REGISTER 
HARDUARE DISPLAY REGISTER 



:*GENERAL PURPOSE REGISTER DEFINITIONS 



RO- 
Rl« 
R2- 
R3» 
R4- 
R5» 
R6- 
R7« 
SP- 
PC« 



KO 
HI 
H2 
K3 
K4 
K5 
K6 
K7 

*e 

K7 



{GENERAL REGISTER 
{GENERAL REGISTER 
{GENERAL REGISTER 
{GENERAL REGISTER 
{GENERAL REGISTER 
(GENERAL REGISTER 
{GENERAL REGISTER 
(GEfCRAL REGISTER 
( (STACK POINTER 
}( PROGRAM COUNTER 



{♦PRIORITY LEVEL DEFINITIONS 



PRO- 
PRl" 
PR2- 
PR3- 
PR4' 
PR5- 
PR6' 
PR7« 



0 
40 
100 
140 
200 
240 
300 
340 



} (PRIORITY LEVEL 
((PRIORITY LEVEL 
; {PRIORITY LEVEL 
{{PRIORITY LEVEL 
{ (PRIORITY LEVEL 
{{PRIORITY LEVEL 
{ {PRIORITY LEVEL 
({PRIORITY LEVEL 



{♦"SUITCH REGISTER" SUITCH DEFINITIONS 

SU15- 100000 

SU14- 40000 

SU13- 20000 

SU12- 10000 

sun- 4000 



C2 
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714 






601060 


716 


000400 


717 


000200 


718 


000100 


719 


000040 


720 


000020 


721 


000010 


722 


000004 


723 


000002 


724 


000001 


725 




726 




727 




728 




729 




730 




731 




732 




733 




734 




735 




736 




737 


100000 


738 


040000 


739 


020000 


740 


010000 


741 


004000 


742 


002000 


743 


001000 


744 


000400 


745 


000200 


746 


000100 


747 


000040 


748 


000020 


749 


000010 


750 


000004 


751 


000002 


752 


000001 


753 




754 




755 




756 




757 




758 




759 




760 




761 




762 




763 




764 




765 


000004 


766 


000010 


767 


000014 


768 


000014 


769 


000014 
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SEQ 001!^ 





?000 


SU09" 


1000 


SU08" 


400 


SU07- 


200 


SU06* 


100 


SW05- 


40 


SU04- 


20 


SU03* 


10 


SU02- 


4 


SUOl- 


2 


SUOO- 


1 


.EQUIV 


SU09.SU9 


.EQUIV 


SU08.SU8 


.EQUIV 


SU07.SU7 


.EQUIV 


SU06.SU6 


.EQUIV 


SU05.SUS 


.EQUIV 


SU04.SU4 


.EQUIV 


SU03.SU3 


.EQUIV 


SU02.SU2 


.EQUIV 


SUOl.SUl 


.EQUIV 


SUOO.SUO 



:*DATA 

BIT15 

BIT14 

BIT13 

BIT12 

BITll 

BITIO 

BIT09 

BIT08 

BIT07 

BIT06 

BIT05 

BIT04 

BIT03 

BIT02 

BITOl 

BITOO 

.EQUIV 

.EQUIV 

.EQUIV 

.EQUIV 

.EQUIV 

.EQUIV 

.EQUIV 

.EQUIV 

.EQUIV 

.EQUIV 



BIT DEFINITIONS (BITOO TO BIT15) 
100000 
40000 
20000 
10000 
4000 
2000 
1000 
400 
200 
100 
40 
20 
10 
4 
2 
1 

BIT09,BIT9 
BIT08.BIT8 
BIT07.BIT7 
BIT06,BIT6 
BIT05.BIT5 
BIT04.BIT4 
BIT03.BIT3 
BIT02.BIT2 
BITOl, BITl 
BITOO, BITO 



:*BASIC CPU* 
ERRVEC- 4 
RESVEC- 10 
TBITVEC-14 
TRTVEC- 14 
BPTVEC- 14 



TRAP VECTOR ADDRESSES 

J} TIME OUT AND OTHER ERRORS 

i {RESERVED AND ILLEGAL INSTRUCTIONS 

!j"T" BIT 

j; TRACE TRAP 

J s BREAKPOINT TRAP (BPT) 
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770 

771 

772 

773 

774 

775 

776 

777 

778 

779 

780 

781 

782 

783 

784 

785 

786 

787 

788 

789 

790 

791 

792 

793 

794 

795 

7% 

797 

798 

799 

800 

801 

802 

803 

804 

805 

806 

807 

808 

809 

810 

811 

812 

813 

814 

815 

816 

817 

818 

819 

820 

821 000014 

822 000016 
823 

824 

825 000042 



000020 
000024 
000030 
000034 
000060 
000064 
000240 
176500 
000300 
000400 
000001 
161000 
000003 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 



000000 
000000 



000014 
012370 
000340 

000042 
000000 
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SEO 0016 



lOTVEC- 

PURVEC- 

EMTVEC- 

TRAPVEC' 

TKVEC- 

TPVEC- 

PIRQVEC" 



20 
24 
30 
34 
60 
64 
240 

ABASE- 176500 
AVECTl- 300 
AUSUR- 400 
»TN- 1 
$SUR- 161000 
BPT- 000003 



AMSGTY-0 

AFATAL»0 

ATESTN-0 

APASS«0 

ADEVCT-0 

AUNIT-0 

AMSGAD-0 

AMSGLG-0 

AENV-0 

AENVM-0 

ASUREG-0 

ACPUOP-0 

AMAMSl-0 

AMTYP1»0 

AMADRl-0 

AMAMS2-0 

AMTYP2-0 

AMADR2-0 

AMAMS3-0 

AhTYP3«0 

AMA0R3-0 

AMAMS4-0 

AmYP4»0 

AHADR4-0 

AVECT2-0 

AOEVM-0 



s; INPUT /OUTPUT TRAP (lOT) **SCQPE** 
: i POWER FAIL 

ssEMULATOR TRAP (EMT) **ERR0R** 

J ; "TRAP" TRAP 

j;TTY KEYBOARD VECTOR 

!iTTY PRINTER VECTOR 

! {PROGRAM INTERRUPT REQUEST VECTOR 



}THIS IS THE COMMAND FOR A TRAP 
; THROUGH 14 (BPT TRAP) 



.ASECT 



.=0 



; ; ************************ ***^*****************»***************** 

;*ALL UNUSED LOCATIONS FROM 4-776 CONTAIN A ".♦2,BPT" 
{♦SEQUENCE TO CATCH ILLC6AL TRAPS £ INTERRUPPTS 
{♦LOCATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 



.-14 

.WORD CATCH 
.WORD 340 



;THE BPT TRAP VECTOR POINTS TO THE 
{ ILLEGAL TRAP HANDLER "CATCH" 



.WORD 



42 

0 
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827 








828 








829 








830 




000174 




831 


000174 


000000 




832 


000176 


000000 




833 








834 




000200 




835 


000200 


000137 


003016 
0">406 


836 


000204 


000137 


837 


000210 


000137 


01b664 


838 








839 




000500 




840 








841 








842 








843 








844 




000500 




845 




000046 




846 


000046 


012322 




847 




000052 




848 


000052 


000000 




849 




000500 




850 








851 








852 








853 








854 








855 




000500 




856 




000024 




857 


000024 


000200 




858 




000044 




859 


000044 


000500 




860 




000500 




861 








862 








863 








864 








865 


000500 






866 


000500 


000000 




867 


000502 


001100 




868 


000504 


000050 




869 


000506 


000060 




870 


000510 


000055 




871 


000512 


000030 




872 








873 








874 








875 








876 








877 








878 








879 




001000 




860 


001000 






881 


001000 


000000 





SCO 0017 
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m 


174 


DISPREG 


!U0R0 


0 


SUREG: 


.UORO 


0 




.-200 






JMP 


START 




JMP 


ECHO 




JMP 


GUTTST 






500 


.SBTTL 


ACTll 


HOOKS 



;D0 INTERFACE TEST 
jDO ECHO TEST 

sDO OUTPUT TEST TO TERMINAL 



i HOOKS REQUIRED BY ACTll 

;SAVE PC 



*SVPC« 
."46 
$ENDAO 
."52 

.UORO 0 
'iSVPC 

.SBTTL APT PARAMETER BLOCK 



!il)St:T L0C.46 TO ADDRESS OF tENDAD IN .$E0P 

j{2)SET L0C.52 TO ZERO 
i i RESTORE PC 



:SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 

.♦X-. 5 : SAVE CURRENT LOCATION 

.«24 nSET POWER FAIL TO POINT TO START OF PROGRAM 

200 ■ *FOR APT START UP 

.•44 ilPOINT TO APT INDIRECT ADDRESS PNTR. 

lAPTHDR i {POINT TO APT »€A0ER BLOCK 

. - . *X i : RESn LOCATION COUNTER 

SETIP AOT PARAMETER BLOCK AS DEFINED IN THE APT-POPll DIAGNOSTIC 
INTERFACE SPEC. 



JAPTHD 

tHIBTS 

tMBAOR 

♦TSTM; 

♦PASTM: 

tUNITM: 



.WORD 0 .:TUO HIGH BITS OF 18 BIT MAILBOX ADDR. 

.UORO *MAIL ii ADDRESS OF APT MAILBOX (BITS 0-15) 

.UORO 50 ;jRUN TIM OF LONGEST TEST 

.UORO 60 jjRUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

.UORO 55 ! {ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 

.UORO »ETEND- ♦HAIL/2 { {LENGTH MAILBOX-ETABLE(UORDS) 



.SBTTL COMMON TAGS 



{*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
{♦USED IN THE PROGRAM. 



♦CMTAG: 



.«1000 
.UORO 



{ {START OF COftlON TAGS 



F2 

SEQ ooie 



CJKDIBO 


11/238 


SLU LTC REPR DIAG 


MACYll 


30(1046) 


*ijt MAO 




rAbt 19 
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COMMON 


TAGS 








882 


001002 


000 


JTSTNM: .BYTE 






.rniJTATIJC IrJC TCCT Ml MQCD 
{LUrllHJ.No 1 nt Ital NUnotK 


883 


001003 


000 


♦ tKr Lb 


Q VTC 
,OT It 


U 




.rrHJTATWC CDDHD CI AT 
{LUrllHJ.nlo tKKUK rLHlj 


884 


001004 


000000 


*TnjT . 
♦ILNl : 


. WUKU 


u 




.rnUTATUC CI CTCCT TTCDATTAU TAI iUT 


885 


001006 


000000 


♦LrHUn 


, WUnU 


u 




.rnuTATiJc crr\DF i nnD Annoccc 


886 


001010 


000000 


* 1 DCDD 

♦LrtKK 


. WUKU 


A 

u 




.rnMTATNQ crnor dptidm pdo PQonoc 

{ LUn 1 n±no oLUrt KC 1 Unn r UK CnnUno 


887 


001012 


000000 


*CDTTI 


unon 


n 




.rnKiTATMC TfiTAi roonoQ ncTFrTcn 

{LUnini,no 1 U 1 HL tnnUno UCICLItU 


888 


001014 


000 


tTTCMQ 


OYTF 


\J 






889 


001015 


001 


f tnnnA 


DYTC 


1 




• rriKiTATMQ May roQnoc opq tpct 


890 


001016 


000000 


♦ERRPC 


.WORD 


U 




.rnuTATiJC or nc i act poono TwcTPiiTTTfiw 


891 


001020 


000000 


$ GO ADR 


.UORO 


V 




• rnNTATNC AnnQP^^ nr 'r^nnn* data 


892 


001022 


000000 


»80ADR 


.WORD 






.rnMTATNc annRPQC nr 'RAn' data 


893 


001024 


000000 


$GODAT 


.UORD 


yj 




.rnuTATKiQ 'crifvt' data 


894 


001026 


000000 


JBODAT 


.UORD 


KJ 




• rnMTATNQ 'RAH' rtATA 


895 


001030 


000000 




.WORD 






.prcrpx/rn. -MCiT tn rf iicm 


896 


001032 


000000 




.UORD 








897 


001034 


000 


JAUTOB 


.BYTE 


A 

V 


• 


• Airrr*1ATTr MOOF TNOTfATOR 


898 


001035 


000 


$ INT AG 


.BYTE 


A 
V 


• 


.TNTFPPIPT MnnF TNTlTrflTriP 
5 API I cnnUr 1 nuuc Jinui-Un i Un 


899 


001036 


000000 




.UORD 


A 
\J 






900 


001040 


177570 


SUR: 


.UORD 


UOMn 






901 


001042 


177570 


DISPLAY: .WORD 


nnTQP 






902 


001044 


177560 


*TKS: 


177560 






-TTY I^RH ^TATI)<i 


903 


001046 


177562 


JTKB: 


177562 








904 


001050 


177564 


$TPS: 


177564 






{III rnx™ 1 cn o 1 n 1 \jo nwo . nmjn^oj 


905 


001052 


177566 


JTPB: 


177566 






• TTY PRTNTFR RIFFFR RFf^ AOnRF<t(i 


906 


001054 


000 


JNULL: 


.BYTE 


o 

V 




■ rfMTATM<; Ml 1 rHARArTFR FDR FTI 1 (i 


907 


001055 


002 


$FILLS 


.BYTE 






• rnNTATM^ A DF FTI 1 PR rHARAfTFRS RFQUTRED 


908 


001056 


012 


$FILLC 


.BYTE 


IP 




• TM.^%rRT fill THAR^ AFTPR A "LIIF FFFD" 


909 


001057 


000 


*TPFLG 


.BYTE 


0 




{"TERMINAL AVAILABLE" FLAG (BIT<07>«0«YES) 


910 


001060 


000000 


♦TMPO: 


.WORD 


A 

V 




.USER DEFINED 








$TMP1: 


.UORD 


n 

V 




{USER OEFirCD 


912 


001064 


OOOOOO 


$TMP2: 


.UORD 


0 




{USER DEFINED 


913 


001066 


oooooo 


JTMP3: 


.UORO 


0 




lUSER DEFBCD 


914 


001070 


OOOOOO 


$TMP4: 


.UORD 


0 




tUSER DEFINED 


915 


001072 


oooooo 


JESCAPEcO 






{ESCAPE ON ERROR ADDRESS 


916 


001074 


077 


$QUES: 


.ASCII 


/?/ 


t tOUESTION HARK 


917 


001075 


015 


♦CRLF: 


.ASCII 


<15> 


I 


i CARRIAGE RETURN 


918 


001076 


000012 


*LF: 


.ASCIZ 


<12> 


I 


iLirC FEED 


919 








920 
921 






.SBTTL 


APT MAILBOX-ETABLE 




922 






: 


923 






.EVEN 










924 


001100 




♦MAIL: 






;;APT MAILBOX 


925 


001100 


OOOOOO 


♦MSGTY 


.UORD 


AMSGTY 


s {MESSAGE TYPE CODE 


926 


001102 


oooooo 


♦FATAL 


. .UORD 


AFATAL 


:i FATAL ERROR NUMBER 


927 


001104 


oooooo 


♦TESTN 


.UORD 


ATESTN 


. iTEST NUWER 


928 


001106 


oooooo 


$PASS: 


.UORO 


APASS 


uPASS COUNT 


929 


001110 


OODOOO 


fDEVCT 


: .UORD 


AOEVCT 


J {DEVICE COUNT 


930 


001112 


oooooo 


♦UNIT: 


.UORD 


AUNIT 


I ;I/0 UNIT NUMBER 


931 


001114 


oooooo 


♦MSG AD 


. .UORD 


AMSGAO 


{{MESSAGE 


ADDRESS 


932 


001116 


oooooo 


IMSGLG 


; .UORD 


AMSGLG 


{ {MESSAGE LENGTH 


933 


001120 




JETABLE: 




J {APT ENVIRO>t€NT TABLE 


934 


001120 


000 


$ENV: 


.BYTE 


AENV 


{ {ENVIRONMENT BYTE 


935 


001121 


000 


»ENVM: 


.BYTE 


AENVM 


{{ENVIRONMENT MODE BITS 


936 


001122 


oooooo 


♦SUREG 


: .UORD 


ASUREG 


{{APT SUITCH REGISTER 


937 


001124 


000400 


♦USUR: 


.UORO 


AUSUR 


{{USER SUITCHES 



G2 
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938 001126 

939 

940 

941 

942 

943 

944 

94:; 001130 

946 001131 

947 

948 

949 

950 

951 001132 
952 

953 001134 

954 001135 

955 001136 

956 001140 

957 001141 

958 001142 

959 001144 

960 001145 

961 001146 
%2 001150 
%3 001152 
964 001154 
%5 001156 
966 001160 
967 

068 
969 
970 
971 
972 
973 
974 
975 
976 
977 
978 
979 
980 
981 

982 001160 
983 

984 001160 

985 001160 
986 

987 
988 

989 001220 

990 001222 

991 001224 

992 001226 
993 



000000 



000 
000 



000000 

000 
000 
000000 
000 
000 
000000 
000 
000 
000000 
000300 
000000 
176500 
000000 



000020 



016010 
024731 
025512 
000000 



MACYll 30(1046) 24 MAR 86 10:44 PAGE 20 
APT MAILBOX ETABLE 



SEQ 0019 



♦CPUOP 
;* 

5* 
5* 
!* 

:* 

♦MAMSl 
*MTYP1 

!* 
!* 

;* 

iMADRl 

jMAMS2 
$MTYP2 
$MA0R2 
*MAMS3 
*MTYP3 
$MA0R3 
*MAMS4 
♦MTYP4 
$MA0R4 
♦VECTl 
♦VECT2 
IBASE: 
♦OEVM: 
♦ETEND 



.WORD ACPUOP 



.BYTE 
.BYTE 



AMAMSl 
AMTYPl 



.WORD AMADRl 



• BYTE 
.BYTE 
.WORD 
.BYTE 
.BYTE 
.UORO 
.BYTE 
.BYTE 
.WORD 
.UCRO 
.UORO 
.UORO 
.UORO 



AMAMS2 

AMTYP2 

AMADR2 

AMAMS3 

AMTYP3 

AMA0R3 

AMAMS4 

AMTYP4 

AMA0R4 

AVECTl 

AVECT2 

ABASE 

AOEVN 



;jCPU TYPE. OPTIONS 
BITS 15 11»CPU TYPE 

11/04-01, 11/05«02. 11/20-03.11/40-04,11/45-05 
11/70-06, P0Q-07,Q-10 
BIT 10-REAL TIME CLOCK 
BIT 9-FLOATING POINT PROCESSOR 
BIT 8-MEMORY MANAGEMENT 
;iHIGH ADDRESS, M.S. BYTE 
5! MEM. TYPE.BLK#1 
MEM. TYPE BYTE -- (HIGH BYTE) 
900 NSEC CORE-001 
300 NSEC BIPOLAR-002 
500 NSEC MOS-003 
s jHIGH ADDRESS. BLK#1 

MEM. LAST AD0R.-3 BYTES. THIS UORD AND LOW OF "TYPE" ABOVE 
;}HIGH ADDRESS. M.S. BYTE 
j}MEM.TYPE,BLK#2 
: J MEM. LAST ADDRESS . BLK#2 
;!HIGH ADDRESS. M.S. BYTE 
j; MEM. TYPE. BLK#3 
i MEM. LAST ADDRESS. BLK«3 
{HIGH AOORESS.M.S.BYTE 
;MEM.TYPE.BLK#4 
! MEM. LAST ADDRESS. BLK«4 
INTERRUPT VECT0R#1.BUS PRI0RITY#1 
J INTERRUPT VECT0R#2BUS PRI0RITY#2 
I i BASE ADDRESS OF EQUIPrCNT UM)ER TEST 
i (DEVICE MAP 



.SBTTL ERROR POINTER TABLE 

*THIS TABLE CONTAINS T« INFORMATION FOR EACH ERROR THAT CAN OCCUR. 

*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUM) IN 

♦LOCATION IITEHB. THIS NUMBER INDICATES UHICH ITEM IN THE TABLE IS PERTINENT. 

*N0TE1: IF IITEHB IS 0 THE (N.Y PERTINENT DATA IS (lERRPC). 

*N0TE2: EACH ITEH IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FXLOUS: 

J POINTS TO THE ERROR MESSAGE 
J POINTS TO THE DATA HEADER 
J POINTS TO THE DATA 
! J POINTS TO THE DATA FORMAT 



;* 


EM 


;* 


DH 


;* 


OT 


i* 


DF 



lERRTB: 
.lERRTB: 



.BLKU 20 



EMS 
DH5 
DT5 
0 



J THIS BLOCK OF 16 LOCATIONS IS HERE TO PACIFY SYSMAC 



jSLUl TCSR DONE NOT SET UITH RESET 
J "TEST* ERR PC TCSR" 
j*TESTN.*ERRPC.CTCSR 



I 

H2 
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994 


0012)0 


At £Y\C^ 

016052 


cnD 


99o 


001202 


U£4 /DO 


uno 




0012o4 




OTA 


W / 


001206 


AAAAAA 

OUUUUv 


A 

u 










OOQ 






FM7 

en f 


1 /V^ 
lUUU 






nH7 








nT7 






VAAAAA/ 


A 

V 












WXc^V 
























ftOI P«/» 


m ^1 ^ 


FM1 1 
cnxx 




(VII OAP 


0P4771 
v£*t r OX 




1 fW) 


001 PAA 


OP^^IP 


OTS 




001 PAA 


OOOOOO 

VAAAAA/ 


0 


101 1 








101P 


001 P70 


OOOOOA 




XVX J 
















1015 


001 ViO 

WX JVw 


01AP06 


EMI 3 

IX W 




Orti VIP 


0P4771 

V£*t f .JX 


DHS 


1017 


001304 


OPSSIP 

VC J JXC 


DT5 


101ft 


001306 


OOOOOO 

WWW 


0 


1019 








lOPO 


001310 


016P54 


EM14 

IX~ 


1QP1 


OOI^IP 


0P4731 

VC"t f WX 




lOPP 


001*^14 


0P551P 


DT5 




001*^16 


OOOOOO 
www 


n 


10PA 








10P5 

XVC J 


001 ^PO 


01f)3P4 


EM15 

IX J 


10P6 

XVCw 


0013PP 


0P4731 
vc~ ■ -^x 




xwc ■ 


001 3P4 


0P5S1 P 

WC J JXC 




10PR 


001 ^P#i 


OOOOOO 


0 


1094 

XUC7 








10% 


001^*^0 


01ft'?7P 


FH16 


10^1 
xvvx 


001 


0P4731 




105P 
xv^c 


001 ^Id 

WX w<^"v 


OPSSIP 

VC J JXC 




10'^'^ 
X\JOO 


001 


OOOOOO 


A 


10'^ 










001 XAO 

W'X 


01 AAVk 


PHI 7 
cnx f 


10'^ 

Xv 


001 \dP 


OP4771 
Uc"» • OX 


OHS 


1077 

XV<J 1 


001 "^AA 




U 1 3 


lOVt 

XVI 


001X4A 




A 

u 


10^9 








1040 


001350 


016470 


En20 


1041 


001352 


024731 


DHS 


1042 


001354 


025512 


DT5 


1043 


001356 


OOOOOO 


0 


1044 








1045 


001360 


016536 


EM21 


1046 


001362 


024756 


DH6 


1047 


001364 


025522 


0T6 


1048 


001366 


OOOOOO 


0 


1049 
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SEQ 002C 



SLUl RCSR DID NOT RETURN SSYNC 
"TEST# ERR PC RCSR" 
$TESTN.$ERRPC.CRCSR 



;SLU1 RBUF DID NOT RETURN SSYNC 
;"TEST# ERR PC RBUF" 
:$TESTN,$ERRPC.CRBUF 



.•MORE PACIFICATION 



; "CAN NOT SET BIT2 OF SLUl TCSR' 
!"TEST# ERR PC TCSR" 
;ITESTN,$ERRPC.CTCSR 



! STILL MORE PACIFICATION 



; "RESET DID NOT CLEAR BIT2 OF SLUl TCSR" 
;«TEST# ERR PC TCSR" 
!$TESTN,$ERRPC.CTCSR 



;"8IT6 OF SLUl TCSR NOT aEAR AFTER RESET2 
s"TEST# ERR PC TCSR" 
.•♦TESTN.IERRPC.CTCSR 



; "SLUl XMIT INTERRUPTED WITH PRIORITY 7" 
5»TEST# ERR PC TCSR" 
;»TESTN.«ERRPC.CTCSR 



"CAN NOT SET BIT6 OF SLUl TCSR" 
"TEST* "RR PC TCSR" 
(TESTN.«ERRPC.CTCSR 



"CAN NOT aEAR BIT6 OF SLUl TCSR" 
"TEST# ERR PC TCS«»" 
♦TESTN.JERRPC.CTCSn 



{"RESET DID NOT aEAR BIT6 OF SLUl TCSR' 
{"TEST# ERR PC TCSR" 
>$TESTN,IERRPC,CTCSR 



j"BIT6 OF SLUl RCSR NOT aEAR AFTER RESET " 
j»TEST# ERR PC RCSR" 
i»TESTN,*ERRPC,CRCSR 



12 
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001370 


UlOOUD 


PM?? 


1051 


00137^ 




nki6 




vwlo '4 




016 


1053 


001376 


000000 


0 


1054 










Ovl*UU 


UXD09C 










nH6 






o3^«;?? 


nT6 

V 1 w 


10SA 




000000 
www 


0 

V 












\A/XHXV 


01^710 

VXD r XV 






001 A17 




DH6 




VA^X^X"* 




DT6 

V 1 U 




001 A1(> 


000000 
www 


0 

V 




001 4P0 


CI 6750 

X^XU f ^v 


EM25 




0014?? 


a?47% 

VC^ f ii^O 


DH6 


1067 


0014?4 


0255?? 


0T6 




0014?6 


000000 

www 


0 










1070 


001430 


0170?3 

VX ' vc^ 


EH26 


1071 

Xw ■ X 


00143? 


0?47S6 


0H6 


107? 


001434 


0255?? 


DT6 


1073 


001436 


000000 

www 


0 


1074 










OOlAdO 
wx***tv 


017060 

VX f VVV 


EI127 


1076 

XV f V 


00144? 


024756 


DH6 


1077 

XV f f 


001444 


025522 


0T6 


107M 

XV f o 


001446 


000000 

www 


0 


1079 

XV ' 7 








lOAO 


001 4S0 


017123 

VX r XCW 


EMSO 


X VOX 


001 ASP 


0?4756 

VC~ 1 


DH6 


xwc 


0014S4 


02552? 


DT6 


1083 

X WW 


001456 


000000 

www 


0 


xww^ 








1085 


001460 


017175 

VX ■ X ■ ^ 


EM31 


XVOV 


00146? 

WX"»wt 


0?4731 


V»^«/ 


1087 

XVO f 


001464 


0?554? 


DT31 

1/ 1 wX 


tOAA 

Xvwv 


001466 


000000 

WWW 


0 

V 


X Vw7 








X\/7V 


001 A70 


01 7?\4 

VX f C-J^ 


wl l«/w 


XV7X 


001 A7P 


0?50'V) 


DH32 

w<>«^w 


XV7C 


001 A7A 


0?S5S? 


DT32 


Xv70 


001 A7A 


OOOOOO 

VAAAAA/ 


0 

V 










1095 

XV 7W 


001500 


017273 

VX f b • w 


EM33 


10% 


001502 


024731 


DH5 


1097 


001504 


025542 


DT31 


1098 


001506 


OOOOOO 


0 


1099 








1100 


001510 


017345 


EM34 


1101 


001512 


024731 


DH5 


1102 


001514 


025542 


DT31 


1103 


001516 


OOOOOO 


0 


1104 








1105 


001520 


017413 


EM35 
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"SLUl RCVR INTERRUPT UITH PRIORITY 7" 
"TEST# ERR PC RCSR" 
♦TESTN.IERRPC.CRCSR 



:"CAN NOT SET BIT6 OF SLUl RCSR" 
;"TEST* ERR PC RCSR" 
;$TESTN,$ERRPC.CRCSR 



;"CAN NOT CLEAR BIT6 OF SLUl RCSR" 
.-"TEST* ERR PC RCSR" 
;$TESTN.$ERRPC.CRCSR 



"CAN NOT CLEAR BIT6 OF SLUl RCSR WITH RESET2 

"TEST* ERR PC RCSR" 

$TESTN,$ERRPC,CRCSR 



;"SLU1 RECEIVER DONE NEVER SET' 
;"TEST# ERR PC RCSR" 
;*TESTN,»ERRPC.CRCSR 



{"RESET DID NOT CLEAR SLUl RCVR DONE- 
; "TEST# ERR PC RCSR" 
:»TESTN.$ERRPC.CRCSR 



{"READING SLUl RBUF DID NOT aEAR RCVR D0»C' 
.•"TEST* ERR PC SCSR" 
t*TESTN.IERRPC.CRCSR 



SLU2 TCSR DID NOT RETURN SSYNC 
"TEST* ERR PC TCSR" 
$TESTN.$ERRPC.TCSR 



SLU2 TBUF DID NOT RETURN SSYNC 
"TEST* ERR PC TBUF- 
$TESTN.$ERRPC.TBUF 



f"SLU2 TCSR DONE NOT CLEARED WITH TBUF FULL' 

i "TEST* ERR PC TCSR" 

!$TESTN.$ERRPC.TCSR 

;"SLU2 TCSR DOC NOT SET AFTER TRANSMIT " 
{"TEST* ERR PC TCSR" 
{♦TESTN.iERRPC.TCSR 



{"SLU2 TCSR DONE NOT SET WITH RESET" 



J2 
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1 106 


001522 


024731 


DH5 


1107 


001524 


025542 


DT31 


1108 


001526 


000000 


0 


1109 
1110 


001530 


017455 


EM36 


1111 


001532 


024756 


DH6 


1112 


001534 


025562 


DT36 


1113 


001536 


000000 


0 


1114 

1115 


001540 


017514 


Eri37 


1116 


001542 


025003 


DH7 


1117 


001544 


025572 


DT37 


1118 


001546 


000000 


0 


1119 








1120 


001550 


017553 


EM40 


1121 


001552 


024731 


0H5 


1122 


001554 


025542 


DT31 


1123 


001556 


000000 


0 


1124 








1125 


001560 


017623 


EM41 


1126 


001562 


024731 


0H5 


1127 


001564 


025542 


DT31 


1128 


001566 


000000 


0 


1129 








1130 


001570 


017661 


EM42 


1131 


001572 


024731 


0H5 


1132 


001574 


025542 


DT31 


1133 


001576 


000000 


0 


1134 








1135 


001600 


017721 


En43 


1136 


001602 


024731 


DH5 


1137 


001604 


025542 


DT31 


1138 


001606 


000000 


0 


1139 








1140 


001610 


017767 


Em4 


1141 


001612 


024731 


OHS 


1142 


001614 


025542 


DT31 


1143 


001616 


000000 


0 


1144 








1145 


001620 


020037 


EM45 


1146 


001622 


024731 


DH5 


1147 


001624 


025542 


DT31 


1148 


001626 


000000 


0 


1149 








1150 


001630 


020105 


Eri46 


1151 


001632 


024731 


OHS 


1152 


001634 


025542 


DT31 


1153 


001636 


000000 


0 


1154 








1155 


001640 


020143 


EM47 


1156 


001642 


024731 


DH5 


1157 


001644 


025542 


DT31 


1158 


001646 


000000 


0 


1159 








1160 


001650 


020203 


EM50 


1161 


001652 


024731 


OHS 
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SEQ 002<^ 



;"TEST# ERR PC TCSR" 
;*TESTN.ERRPC,TCSR 



j''SLU2 RCSR DID NOT RETURN SSYNC" 
5"TEST0 ERR PC RCSR" 
;*TESTN,ERRPC.RCSR 



:SLU2 RBUF DID NOT RETURN SSYNC" 
s"TEST# ERR PC RBUF" 
jITESTN.ERRPC.RBUF 



5"BIT0 OF SLU2 TCSR NOT CLEAR AFTER RESET* 
s"TEST« ERR PC TCSR 
;$TESTN.*ERRPC.TCSR 



;"CAN NOT SET BITO OF SLU2 TCSR" 
{"TEST# ERR PC TCSR 
s$TESTN.*ERRPC.TCSR 



"CAN NOT aEAR BITO OF SLU2 TCSR" 
"TEST# ERR PC TCSR 
♦TESTN.4ERRPC.TCSR 

; "RESET DID NOT aEAR BITO OF SLU2 TCSR" 
J "TEST* ERR PC TCSR 
!*TESTN.*ERRPC.TCSR 

{ "BIT6 OF SLU2 TCSR NOT aEAR AFTER RESET2 
,-TFST# ERR PC TCSR 
tnESTN.IERRPC.TCSR 

"SLU2 XMIT INTERRUPTED WITH PRIORITY 7" 
"TEST# ERR PC TCSR 
ITESTN.IERRPC.TCSR 



;"CAN NOT SET BIT6 OF SLU2 TCSR" 
t "TEST* ERR PC TCSR 
!*TESTN.*ERRPC.TCSR 

;"CAN NOT CLEAR BIT6 OF SLU2 TCSR" 
; "TEST* ERR PC TCSR 
;ITESTN.IERRPC.TCSR 

; "RESET DID NOT CLEAR BIT6 OF SLU2 TCSR' 
J "TEST* ERR PC TCSR 



<2 
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1162 


001654 


025542 


DT31 


1163 


001656 


000000 


0 


1164 
1165 


001660 


020251 


EM51 


1166 


001662 


024756 


DH6 


1167 


001664 


025562 


DT36 


1168 

1 1 AQ 


001666 


000000 


0 


1107 

1170 


001670 


020321 


EM52 


1171 


001672 


024756 


DH6 


1172 


001674 


025562 


DT36 


1173 


001676 


000000 


0 


1174 








1175 


001700 


020365 


EM53 


1176 


001702 


024756 


DH6 


1177 


001704 


025562 


DT36 


1178 


001706 


000000 


0 


1179 
1180 


001710 


020423 


EH54 


1181 


001712 


024756 


DH6 


1182 


001714 


025562 


DT36 


1183 


001716 


000000 


0 


1184 








1185 


001720 


020463 


EM55 


1186 


001722 


024756 


DH6 


1187 


001724 


025562 


DT36 


1188 


001726 


000000 


0 


1189 








1190 


001730 


020536 


EM56 


1191 


001732 


024756 


0H6 


1192 


001734 


025562 


DT36 


1193 


001736 


000000 


0 


1194 








1195 


001740 


020573 


EM57 


11% 


001742 


024756 


DH6 


1197 


001744 


025562 


0T36 


1198 


001746 


000000 


0 


1199 








1200 


001750 


020636 


EM60 


1201 


001752 


024756 


0H6 


1202 


001754 


025562 


DT36 


1203 


001756 


000000 


0 


1204 








1205 


001760 


020710 


EM61 


1206 


001762 


025055 


DH61 


1207 


001764 


025602 


DT61 


1208 


001766 


000000 


0 


1209 








1210 


001770 


020741 


EH62 


1211 


001772 


025055 


DH61 


1212 


001774 


025602 


DT61 


1213 


001776 


000000 


0 


1214 








1215 


002000 


021003 


EM63 


1216 


002002 


025055 


0H61 


1217 


002004 


025602 


DT61 
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SEQ 0023 



5»TESTN,»ERRPC,TCSR 



!"BIT6 OF SLU2 RCSR NOT CLEAR AFTER RESET' 
s"TEST# ERR PC RCSR" 
{♦TESTN.ERRPC.RCSR 



;"SLU2 RCVR INTERRUPT WITH PRIORITY 7" 
;"TEST# ERR PC RCSR" 
:iTESTN,ERRPC.RCSR 



"CAN NOT SET BIT6 OF SLU2 RCSR" 
"TEST# ERR PC RCSR" 
♦TESTN.ERRPC.RCSR 



5 "CAN NOT CLEAR BIT6 OF SLU2 RCSR' 
j"TESTO ERR PC RCSR" 
;$ TESTN.ERRPC.RCSR 



5 "CAN NOT CLEAR BIT6 OF SLU2 RCSR WITH RESET2 
s"TEST« ERR PC RCSR" 
; I TESTN.ERRPC.RCSR 



5"SLU2 RECEIVER DONE NEVER SET* 
t»TEST# ERR PC RCSR" 
;ITESTN.ERRPC.RCSR 



"RESET DID NOT CLEAR SLU2 RCVR DONE" 
-TEST# ERR PC RCSR" 
«TESTN.ERRPC.RCSR 



"READING SLU2 RBUF DID NOT CLEAR RCVR DONE" 

"TEST* ERR PC RCSR" 

♦TESTN.ERRPC.RCSR 



;LKS DID NOT RETURN SSYNC 
}"TEST# ERR PC LKS" 
i$TESTN.ERRPC.LKS 



;"BIT6 OF LKS NOT CLEAR AFTER RESET' 
s"TEST# ERR PC LKS" 
;*TESTN.*ERRPC.LKS 



;"LKS INTERRUPT UITH PRIORITY 7" 
;"TEST# ERR PC LKS" 
;$TESTN.IERRPC.LKS 



L2 
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1218 


002006 


000000 


0 


1219 
1220 


002010 


021041 


EM64 


1221 


002012 


025055 


DH61 


1222 


002014 


025602 


DT61 


1223 


002016 


000000 


0 


1224 

1225 


002020 


021071 


EM65 


1226 


002022 


025055 


DH61 


1227 


002024 


025602 


DT61 


1228 


002026 


000000 


0 


1229 








1230 


002030 


021123 


EM66 


1231 


002032 


025055 


DH61 


1232 


002034 


025602 


DT61 


1233 


002036 


000000 


0 


1234 








1235 


002040 


021163 


EM67 


1236 


002042 


025055 


0H61 


1237 


002044 


025602 


0T61 


1238 


002046 


000000 


0 


1239 








1240 


002050 


021223 


EM70 


1241 


002052 


025055 


0H61 


1242 


002054 


025602 


DT61 


1243 


002056 


000000 


0 


1244 








1245 


002060 


021255 


EM71 


1246 


002062 


025055 


0H61 


1247 


002064 


025602 


DT61 


124'j 


002066 


000000 


0 


1249 








1250 


002070 


021306 


EM72 


1251 


002072 


025101 


DH72 


1252 


002074 


025612 


0T72 


1253 


002076 


000000 


0 


1254 








1255 


002100 


000004 


.BLKU 


1256 








1257 








1258 


002110 


021367 


EM74 


1259 


002112 


024731 


0H5 


1260 


002114 


025512 


0T5 


1261 


002116 


OCJOOO 


0 


1262 








1263 


002120 


021432 


EM75 


1264 


002122 


024731 


0H5 


1265 


002124 


025512 


0T5 


1266 


002126 


000000 


0 


1267 








1268 


002130 


021466 


EM76 


1269 


002132 


024731 


0H5 


1270 


002134 


025512 


DT5 


1271 


002136 


000000 


0 


1272 








1273 


002140 


021530 


EM77 
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SEQ 0024 



: "CAN NOT SET BIT6 OF LKS" 
;"1EST# ERR PC LKS" 
;$TESTN.$ERRPC.LKS 



5 "CAN NOT CLEAR BIT6 OF LKS" 
."TEST* ERR PC LKS" 
!$TESTN,$ERRPC.LKS 



; "RESET DID NOT CLEAR BIT6 OF LKS" 
; "TEST# ERR PC LKS" 
:$TESTN.$ERRPC.LKS 



;"BIT7 OF LKS NOT SET AFTER RESET2 
;"TEST# ERR PC LKS" 
;$TESTN.IERRPC.LKS 



!"CAN NOT CLEAR BIT7 OF LKS' 
{"TEST# ERR PC LKS" 
!*TESTN,*ERRPC.LKS 



5"BIT7 OF LKS DOES NOT SET" 
5"TEST#ERRPC LKS" 
>ITESTN.»ERRPC.LKS 

{WRITING TO ONE INTERNAL ADDRESS MODIFIED ANOTHER 
}"TEST# ERR PC GOOD BAD GOOATA BODATA 
t »TESTN, »ERRPC. JGDAOR. »BDADR. JGOOAT . $B00AT 

;THE LAST IN A LONG LINE OF PACIFICATION 



j"SLUl XMIT INTERRUPTS UHEN DISABLED' 
s"TEST# ERR PC TCSR" 
;$TESTN.$ERRPC.CTCSR 



"SLUl XMIT DID NOT INTERRUPT" 
"TEST# ERR PC TCSR" 
»TESTN.*ERRPC,CTCSR 

I "SLUl XMIT INTERRUPT AT PRIORITY 7" 
: "TEST# ERR PC TCSR" 
s*TESTN,»ERRPC.CTCSR 



;"SLU1 XMIT INTERRUPTS WITH ENABLE CLEAR" 



M2 



CJKDIBO 11/23B SLU LTC REPR DIAG 
JKDIBO.Pll 24-MAR-86 09:57 



MACYll 30(1046) 24 MAR 
ERROR POINTER TABLE 



1274 


002142 


024731 


DH5 


1275 


002144 


025512 


DT5 


1276 


002146 


000000 


0 


1277 
1278 


002150 


021577 


EMIOO 


1279 


002152 


024731 


DH5 


1280 


002154 


025512 


DT5 


1281 


002156 


000000 


0 


1282 






EMIOI 


1283 


002160 


021633 


1284 


002162 


024731 


0H5 


1285 


002164 


02S512 


DT5 


1286 


002166 


000000 


0 


1207 








1288 


002170 


021664 


Eni02 


1289 


002172 


024731 


0H5 


1290 


002174 


025512 


DT5 


1291 


002176 


000000 


0 


1292 
1293 


002200 


021736 


EM103 


1294 


002202 


024756 


DH6 


1295 


002204 


025522 


DT6 


1296 


002206 


000000 


0 


1297 
1298 


002210 


022005 


EM104 


1299 


002212 


024756 


0H6 


1300 


002214 


025522 


DT6 


1301 


002216 


000000 


0 


1302 








1303 


002220 


022041 


EM105 


1304 


002222 


024756 


0H6 


1305 


002224 


025522 


DT6 


1306 


002226 


000000 


0 


1307 








1308 


002230 


022104 


EH106 


1309 


002232 


024756 


0H6 


1310 


002234 


025522 


DT6 


1311 


002236 


000000 


0 


1312 








1313 


002240 


022165 


Em07 


1314 


002242 


024756 


0H6 


1315 


002244 


025522 


DT6 


1316 


002246 


000000 


0 


1317 








1318 


002250 


022221 


EtlllO 


1319 


002252 


024756 


DH6 


1320 


002254 


025522 


0T6 


1321 


002256 


000000 


0 


1322 








1323 


002260 


022256 


EMlll 


1324 


002262 


024756 


DH6 


1325 


002264 


025522 


0T6 


1326 


002266 


000000 


0 


1327 








1328 


002270 


022330 


EM112 


1329 


002272 


024756 


DH6 



10:44 PAGE 26 



SEQ OC^Jt, 



s"TEST# ERR PC TCSR" 
5»TESTN.IERRPC.CTCSR 



s"SLUl XMIT DID NOT INTERRUPT" 
:"TEST# ERR PC TCSR" 
:$TESTN.$ERRPC.CTCSR 



;"SLU1 XMIT RE-INTERRUPTED" 
;"TEST# ERR PC TCSR" 
;$TESTN.»ERRPC,CTCSR 



; "LOADING SLUl TBUF DID NOT aEAR INTERRUPT" 
;"TEST# ERR PC TCSR" 
:$TESTN,$ERRPC.CTCSR 



"bLUl RCVR INTERRUPTS UITH ENABLE CLEAR' 
"TEST# ERR PC RCSR" 
♦TESTN.^ERRPC.CRCSR 



"SLUl RCVR DID NOT INTERRUPT" 
"TEST* ERR PC RCSR" 
♦TESTN.<ERRPC.CRCSR 

;-SLUl RCVR INTERRUPTS AT PRIORITY 7" 
: -TEST# ERR PC RCSR" 
tITESTN.IERRPC.CRCSR 

"SLUl RCVR INTERRUPTS UITH INTERRUPT ENABLE CLEAR" 

-TEST# ERR PC RCSR" 

ITESTN.IERRPC.CRCSR 



;"SLU1 RCVR DID NOT INTERRUPT' 
!»TEST#ERRPC RCSR" 
i ITESTN.IERRPC.CRCSR 



J "SLUl RECEIVER RE- INTERRUPTED" 
; "TEST# ERR PC RCSR" 
; ITESTN.IERRPC.CRCSR 

"SLUl READING RBUF DID NOT CLEAR INTERRUPT 
"TEST* ERR PC RCSR" 
ITESTN.IERRPC.CRCSR 

: "RESET DID NOT CLEAR SLUl RCVR INTERRW>T" 
J "TEST* ERR PC RCSR" 



N2 

CJKOIBO 11/23B SLU LTC REPR DIAG MACYH 30(1046) 24-MAR- 

JKOIBO.Pll 24-nAR-86 09:57 ERROR POINTER TABLE 



1330 


002274 


025522 


0T6 


1331 


002276 


000000 


0 


1332 








1333 


002300 


022400 


Eriii3 


1334 


002302 


024756 


0H6 


1335 


002304 


025522 


0T6 


1336 


002306 


000000 


0 


1337 








133« 


002310 


022433 


EMI 14 


1339 


002312 


024756 


0H6 


1340 


002314 


025522 


DT6 


1341 


002316 


000000 


0 


1342 








1343 


002320 


022477 


EMI 15 


1344 


002322 


025157 


DH115 


1345 


002324 


025630 


DT115 


1346 


002326 


000000 


0 


1347 








1346 


002330 


022522 


EM116 


1349 


002332 


024731 


0H5 


1350 


002334 


025542 


0T31 


1351 


002336 


000000 


0 


1352 








1353 


002340 


022565 


EM117 


1354 


002342 


024731 


DH5 


1355 


002344 


025542 


0T31 


1356 


002346 


000000 


0 


1357 








1356 


002350 


022621 


EM120 


1359 


002352 


024731 


0H5 


1360 


002354 


025542 


DT31 


1361 


002356 


000000 


0 


1362 








1363 


002360 


022663 


EM121 


1364 


002362 


024731 


0H5 


1365 


002364 


025542 


DT31 


1366 


002366 


000000 


0 


1367 








1368 


002370 


022732 


EM122 


1369 


002372 


024731 


DH5 


1370 


002374 


02SS42 


0T31 


1371 


002376 


000000 


0 


1372 








1373 


002400 


022766 


EM123 


1374 


002402 


024731 


0H5 


1375 


002404 


025542 


DT31 


1376 


002406 


000000 


0 


1377 








1378 


002410 


023017 


EM124 


1379 


002412 


024731 


DH5 


1380 


002414 


025542 


DT31 


1381 


002416 


000000 


0 


1382 








1383 


002420 


023071 


EM125 


1384 


002422 


024756 


0H6 


1385 


002424 


025562 


DT36 



44 PAGE 27 



tITESTN.IERRPC.CRCSR 



!"SLU1 'OR' FLAG DID NOT SET" 
;"TEST# ERR PC RCSR" 
jtTESTN.IERRPC.CRCSR 



j"SLUl 'ERROR' NOT SET WITH 'OR' FLAG' 
s"TEST# ERR PC RCSR" 
:»TESTN.$ERRPC,CRCSR 



s"DATA COMPARE ERROR" 

j-TEST* ERR PC CRCSR GOOD BAD" 

: ITESTN , »ERRPC . CRCSR . GO . BD 



j''SLU2 XHIT INTERRUPTS UHEN DISABLED" 
;"TEST# ERR PC TCSR" 
;tTESTN.»ERRPC.TCSR 



"SLU2 XMIT DID NOT INTERRUPT" 
"TEST# ERR PC TCSR" 
♦TESTN.IERRPC.TCSR 



:"SLU2 XMIT INTERRUPT AT PRIORITY 7" 
;-TEST#ERRPC TCSR" 
t»TESTN.*ERRPC.TCSR 



''SLU2 XMIT INTERRUPTS WITH ENABLE aEAR* 
"TEST# ERR PC TCSR" 
»TESTN.«ERRPC.TCSR 



;"SLU2 XMIT DID NOT INTERRUPT' 
;"TEST# ERR PC TCSR" 
!»TESTN.$ERRPC.TCSR 



:''SLU2 XMIT RE -INTERRUPTED" 
8 "TEST* ERR PC TCSR" 
;»TESTN.»ERRPC.TCSR 

! "LOADING SLU2 TBUF DID NOT aEAR INTERRUPT' 
; "TEST# ERR PC TCSR" 
ilTESTN.IERRPC.TCSR 



!"SLU2 RCVR INTERRUPTS UITH ENABLE aEAR" 
J "TEST# ERR PC RCSR" 
;ITESTN.IERRPC,RCSR 



B3 

CJKDIBO 11/23B SLU LTC REPR DIAG MACYll 30(1046) 24 r!*R 

JKDIBO.Pll 24 MAR-8b 09:57 ERROR POINTER TABLE 



1566 


002426 


000000 


0 


1387 






EM126 


1388 


002430 


023140 


1389 


002432 


024756 


0H6 


1390 


002434 


025562 


DT36 


1391 


002436 


000000 


0 


1392 
1393 


002440 


023174 


EM127 


1394 


002442 


024756 


0H6 


1395 


002444 


025562 


DT36 


1396 


002446 


000000 


0 


1397 








1398 


002450 


023237 


Eni30 


1399 


002452 


024756 


0H6 


1400 


002454 


025562 


DT36 


1401 


002456 


000000 


0 


1402 








1403 


002460 


023320 


Enl31 


1404 


002462 


024756 


f\LlC 

DHd 


1405 


002464 


025562 


0T36 


1406 


002466 


000000 


0 


1407 








1408 


002470 


023354 


cni32 


1409 


002472 


024756 


DH6 


1410 


002474 


025562 


DT36 


1411 


002476 


000000 


0 


1412 








1413 


002500 


023411 


cni33 


1414 


002502 


024756 


0H6 


1415 


002504 


025562 


DT3o 


1416 


002506 


000000 


0 


1417 








1418 


002510 


023463 


Enl54 


1419 


002512 


024756 


DH6 


1420 


002514 


025562 


0T36 


1421 


002516 


000000 


0 


1422 








1423 


002520 


023533 


Enl35 


1424 


002522 


024756 


DH6 


1425 


002524 


025562 


DT36 


1426 


002526 


000000 


0 


1427 








1428 


002530 


023566 


Em36 


1429 


002532 


024756 


0H6 


1430 


002534 


025562 


0T36 


1431 


002536 


000000 


0 


1432 








1433 


002540 


023632 


Em37 


1434 


002542 


025223 


0H137 


1435 


002544 


025644 


0T137 


1436 


002546 


000000 


0 


1437 








1438 


002550 


023701 


EM140 


1439 


002552 


024756 


DH6 


1440 


002554 


025522 


0T6 


1441 


002556 


000000 


0 



10:44 PAGE 28 



5EQ 0027 



;"SLU2 RCVR DID NOT INTERRUPT' 
}"TEST# ERR PC RCSR" 
j»TESTN.$ERRPC.RCSR 



;"SLU2 RCVR INTERRUPTS AT PRIORITY 7 
;"TEST# ERR PC RCSR" 
j»TESTN.»ERRPC.RCSR 



{"SLU2 RCVR INTERRUPTS WITH INTERRUPT ENABLE aEAR" 

;"TEST# ERR PC RCSR" 

:$TESTN.IERRPC,RCSR 



;"SLU2 RCVR DID NOT INTERRUPT" 
i"TEST# ERR PC RCSR" 
i$TESTN.$ERRPC.RCSR 



j"SLU2 RECEIVER RE -INTERRUPTED" 
j*TEST# ERR PC RCSR" 
jlTESTN.$ERRPC,RCSR 



i"SLU2 READING RBUF DID NOT aEAR INTERRUPT" 

J "TEST* ERR PC RCSR" 

jITESTN.IERRPC.RCSR 



; "RESET DID NOT CLEAR SLU2 RCVR INTERRUPT" 
i"TEST# ERR PC RCSR" 
{♦TESTN.IERRPC.RCSR 



5"SLU2 'OR' FLAG DID NOT SET" 
;"TEST# ERR PC RCSR" 
;$TESTN.»ERRPC.RCSR 



;"SLU2 'ERROR' NOT SET WITH 'OR' FLAG" 
;"TEST# ERR PC RCSR" 
jlTESTN,*ERRPC.RCSP 



;"SLU2 BREAK DID NOT TRANSMIT ALL ZEROES" 
;»TEST#ERRPC RCSR DATA" 
J iTESTN , »ERRPC . RCSR . $BOOAT 



{"BREAK DID NOT SET FRAMING ERROR" 
{"TEST* ERR PC RCSR" 
{$TESTN,$ERRPC.RCSR 



C3 

CJKDI80 11/238 SLU LTC REPR OIAG MACYll 30(1046) 24 MAR- 

JKOIBO.Pll 24-MAR 86 09:57 ERROR POINTER TABLE 



1442 








1443 


002560 


023741 


EM141 


1444 


002562 


024756 


DH6 


1445 


002564 


025562 


0T36 


1446 


002566 


000000 


0 


1447 








1448 


002570 


024005 


EM142 


1449 


002572 


025260 


DH142 


1450 


002574 


025656 


0TJ42 


1451 


002576 


000000 


0 


1452 








1453 


002600 


024043 


Em43 


1454 


002602 


025055 


DH61 


1455 


002604 


025602 


DT61 


1456 


002606 


000000 


0 


1457 








1458 


002610 


024077 


EM 144 


1459 


002612 


025055 


DH61 


1460 


002614 


025602 


DT61 


1461 


002616 


000000 


0 


1462 








1463 


002620 


024134 


EM145 


1464 


002622 


025055 


0H61 


1465 


002624 


025602 


0T61 


1466 


002626 


000000 


0 


1467 








1468 


002630 


024170 


Em46 


1469 


002632 


025055 


0H61 


1470 


002634 


025602 


0T61 


1471 


002636 


000000 


0 


1472 








1473 


002640 


024224 


EM147 


1474 


002642 


025055 


0H61 


1475 


002644 


025602 


0T61 


1476 


002646 


000000 


0 


1477 








1478 


002650 


024251 


EM150 


1479 


002652 


025055 


DH61 


1480 


002654 


025602 


0T61 


1481 


002656 


000000 


0 


1482 








1483 


002660 


024313 


EM151 


1484 


002662 


025055 


0H61 


1485 


002664 


025602 


0T61 


1486 


002666 


000000 


0 


1487 








1468 








1489 


002670 


024422 


EM153 


1490 


002672 


025157 


0H115 


1491 


002674 


025630 


0T115 


1492 


002676 


000000 


0 


1493 








1494 


002700 


024455 


EM154 


1495 


002702 


025260 


0H142 


1496 


002704 


025656 


0T142 


1497 


002706 


000000 


0 



44 PAGE 29 



:"SLU2 'ERROR' NOT SET WITH 'FR' FLAG 
5 "TEST* ERR PC RCSR" 
;»TESTN.$ERRPC.RCSR 



i"OATA COMPARE ERROR WITH CABLE" 
{"TEST* ERR PC RCSR GOOD BAD" 
; » TESTN . lERRPC . RCSR , GO , BO 



s"RTC INTERRUPT AT PRIORITY 7' 
s"TEST# ERR PC LKS" 
!»TESTN.»ERRPC.LKS 



; "RTC INTERRUPTS UHEN DISABLED" 
;''TEST# ERR PC LKS" 
; ♦TESTN. »ERRPC. LKS 



"RTC INTERRUPT DID MOT OCCUR" 
"TEST* ERR PC LKS" 
♦TESTN. ♦ERRPC. LKS 



: "RTC INTERRUPT DID NOT OCCUR" 
;"TEST* ERR PC LKS" 
TESTN, lERRPC. LKS 



"RTC DOUBLE INTERRUPT' 
"TESTff ERR PC LKS" 
♦TESTN. lERRPC.LKS 



"RESET DID NOT aEAR RTC INTERRUPT* 
-TEST* ERR PC LKS" 
♦TESTN. ♦ERRPC. LKS 



; "RTC INTERRUPT DID MOT aEAR UITH BIT7 OF LKS* 
J "TEST* ERR PC LKS" 
.•♦TESTN. ♦ERRPC. LKS 



;"SLU1 RECEIVER STATUS ERROR" 
,"TEST# ERR PC CRCSR GOOD BAD" 
; ♦TESTN. ♦ERRPC. CRCSR. ♦GOOTA. ♦BODAT 



jSLU2 RECEIVER STATUS ERROR 

; "TESTN ERR PC RCSR GOOD BAD" 

; ♦TESTN . ♦ERRPC . RCSR . ♦GODAT . ♦BDOAT 



D3 



CJKDIBO 11/238 SLU LTC REPR DIAG 
JKDIBO.Pll 24-MAR-86 09:57 



1496 

1499 

1500 

1501 

1502 

1503 

1504 

1505 

1506 

1507 

1508 

1509 

1510 

1511 

1512 

1513 

1514 

1515 

1516 

1517 

1518 

1519 

1520 

1521 

152^' 

1523 

1524 

1525 

1526 

1527 

1528 

1529 

1530 

1531 

1532 

1533 

1534 

1535 

1536 

1537 

1538 

1539 

1540 

1541 

1542 

1543 

1544 

1545 

1546 

1547 

1548 

1549 

1550 

1551 

1552 

1553 



002710 
002712 
002714 
002716 

002720 
002722 
002724 
002726 

002730 
002732 
002734 
002736 

002740 
002742 
002744 
002746 



002750 
002752 
002754 
002756 
002760 
002762 
002764 
002766 
002770 



002772 
002774 
002776 
003000 
003002 
003004 
003006 
003010 
003012 
003014 

003016 
003022 
003026 
003032 
003036 



024545 
025157 
025630 
OOOOCO 

024612 
025361 
025670 
000000 

024647 

025260 
025656 
000000 

024714 
025425 
025704 
000000 



176500 
176502 
176504 
176506 
177560 
177562 
177564 
177566 
177546 



000300 
000302 
000304 
000306 
000060 
000062 
000064 
000066 
000100 
000102 

005037 
005037 
005037 
005037 



001102 
001100 
001104 
001156 



MACYll 30(1046) 24-MAR-86 
ERROR POINTER TABLE 



EM156 
DH115 
DT115 
0 

Em57 
DH155 
DT157 
0 

EMieo 

DH142 
0T142 

0 

EM161 
DH161 
DT161 
0 



10:44 PAGE 30 



}"SLU1 DATA COMPARE ERROR IN EXERCISER' 
;"TEST# ERR PC CRCSR GOOD BAD" 
; ITESTN , lERRPC . CRCSR , GO . BD 



; "INCORRECT RECEIVE COUNT SLU2 
;"TEST# ERR PC RCSR TRANS RCV" 
s ♦ TESTN , lERRPC , RCSR , XMTCT2 . RCVCT2 



;"SLU2 DATA COMPARE ERROR IN EXERCISER' 
!"TEST# ERR PC RCSR GOOD BAD" 
;ITESTN,IERRPC.RCSR.GD,BD 



;"TRAP CATCHER" 

;"TEST# ERR PC OLOPC TRAP ADR' 
; ♦TESTN . lERRPC . OLDPC . BDVECT 



SEQ 0029 



: REGISTER ADDRESSES OF INTERNAL ON BOARD OPTIONS 



RCSR 

RBUF 

TCSR 

TBUF 

CRCSR 

CR6UF 

CTCSR 

CTBUF 

LKS: 



.WORD 

.WORD 

.UORD 

.WORD 

177560 

177562 

177564 

177566 

.WORD 



176500 
176502 
176504 
176506 



177546 



SLU2 COMMAND/STATUS REGISTER 
SLU2 RECEIVER BUFFER 

SLU2 TRANSMITTER COMMAhO/STATUS REGISTER 
SLU2 TRANSMITTER BUFFER 
SLUl RECEIVER C0»t1AND/STATUS REGISTER 
SLUl RECEIVER BUFFER 

SLUl TRANSMITTER COMMAND/STATUS REGISTER 
SLUl TRANSMITTER BUFFER 
LTC COMMAND/STATUS RCGISTER 



: VECTOR ADDRESSES FOR ON BOARD OPTIONS 



RVECT: .WORD 300 

RPSU: .UORD 302 

TVECT: .WORD 304 

TPSU: .WORD 306 

CRVECT: 60 

CRPSU: 62 

CTVECT: 64 

CTPSU: 66 

RTCVT: .WORD 100 

RTCPSU: .WORD 102 



{RECEIVER INTERRUPT VECTOR 
{TRANSMITTER INTERRUPT VECTOR 



003036 012706 001000 



START: CLR $FATAL : CLEAR ERROR NO. 

CLR ♦MS6TYP j CLEAR MESSAGE TYPE 

CLR ♦TESTN j CLEAR TEST NO. 

CLR *DEVM t CLEAR FLAGS INDICATING DEVICES UNDER TEST 

1^: 

.SBTTL INITIALIZE THE COMMON TAGS 
;} CLEAR THE COMMON TAGS (ICMTAG) AREA 

MOV ♦♦CMTAG.R6 { j FIRST LOCATION TO BE CLEARED 



E3 



CJKDIBO 11/238 SLU LTC REPR DIAG 
JKDIBO.Pll 24-MAR-86 09:57 



MACYll 30(1046) 24 MAR-86 
INITIALIZE THE COMMON TAGS 















CLR 








001040 






CMP 




005050 


001374 








BNE 


1557 


003052 


012706 


001000 






MOV 


1558 










: INITIALIZE A 


1559 


003056 


012737 


013114 


000020 




MOV 


1560 


003064 


012737 


000340 


000022 




MOV 


1561 


003072 


012737 


012420 


000030 




MOV 


1562 


003100 


012737 


000340 


000032 




MOV 


1563 


003106 


012737 


015326 


000034 




MOV 


1564 


003114 


012737 


000340 


000036 




MOV 


1565 


003122 


012737 


012736 


000024 




MOV 


1566 


003130 


012737 


000340 


000026 




MOV 


1567 


003136 


013737 


012270 


012262 




MOV 


1568 


003144 


005037 


001072 






CLR 


1569 


003150 


112737 


000001 


001015 




MOVB 


1570 


003156 


012737 


003156 


001006 




MOV 


1571 


003164 


012737 


003164 


001010 




MOV 


1572 










ssSIZE FOR A H 


1573 










:i EQUAL 


TO A 


1574 


003172 


013746 


000004 






WV 


1575 


003176 


012737 


003232 


000004 




MOV 


1576 


003204 


012737 


177570 


001040 




MOV 


1577 


003212 


012737 


177570 


001042 




MOV 


1578 


003220 


022777 


177777 


175612 




CMP 


1579 


003226 


001012 








BNE 


1580 














1581 


003230 


000403 








BR 


1582 


003232 


012716 


003240 




64»: 


MOV 


1583 


003236 


000002 








RTI 


1584 


003240 


012737 


000176 


001040 


651: 


MOV 


1585 


003246 


012737 


000174 


001042 




MOV 


1586 


003254 


012637 


000004 




66$: 


MOV 


1587 














1588 


003260 


005037 


001106 






CLR 


1589 


003264 


132737 


000200 


001121 




BITB 


1590 


003272 


001403 








BEQ 


1591 


003274 


012737 


001122 


001040 




MOV 


1592 


003302 








671: 




1593 










.SBTTL 


GET VA 


1594 


003302 


005737 


000042 






TST 


1595 


003306 


001012 








BNE 


15% 


003310 


123727 


001120 


000001 




CMPB 


1597 


003316 


001406 








BEQ 


1598 


003320 


023727 


001040 


000176 




CMP 


1599 


003326 


001005 








BNE 


1600 


003330 


104406 








GTSUR 


1601 


003332 


000403 








BR 


1602 


003334 


112737 


000001 


001034 


68$: 


MOVB 


1603 


003342 








69$: 




1604 


003342 


032777 


000060 


175470 




BIT 


1605 


003350 


001003 








BNE 


1606 


003352 


052737 


000001 


001156 




BIS 


1607 


003360 


032777 


000050 


175452 


2$: 


BIT 


1606 


003366 


001003 








BNE 


1609 


003370 


052737 


000002 


001156 




BIS 



10:44 PAGE 31 



CLEAR MEMORY LOCATION 



SEQ 0030 



;;LOOP BACK IF NO 

SETUP THE STACK POINTER 



(R6)* 

#SUR.R6 ijDONE? 
.-6 

#1000. SP 
FEW VECTORS 

#♦ SCOPE. a#IOTVEC ;;IOT VECTOR FOR SCOPE ROUTINE 
*340,a#I0TVEC*2 :s LEVEL 7 

*$ERR0R.a#EMTVEC ;jEMT VECTOR FOR ERROR ROUTINE 
#340.a#EMTVEC*2 siLEVEL 7 

*$TRAP.a#TRAPVEC ;;TRAP VECTOR FOR TRAP CALLS 
#340. a#TRAPVEC*2; LEVEL 7 
#$PURDN,a#PURVEC ;s POWER FAILURE VECTOR 
«340,9«PURVEC42 :;LEVEL 7 



♦eno6t.*eopct 

*ESCAPE 
#1.IERMAX 
♦..♦LPAOR 
#.,*LPERR 



j; SETUP END -OF -PROGRAM COUNTER 
s; CLEAR THE ESCAPE ON ERROR ADDRESS 
J : ALLOW ONE ERROR PER TEST 
; {INITIALIZE THE LOOP ADDRESS FOR SCOPE 
liSETUP THE ERROR LOOP ADDRESS 
GISTER. IF NOT FOUND OR IT IS 
-1". SETUP FOR A SOFTWARE SWITCH REGISTER. 
8#ERRVEC . - ( SP ) ; : SAVE ERROR VECTOR 

s: SET UP ERROR VECTOR 
J : SETUP FOR A HARDWARE SWICH REGISTER 
»;AND A HARDWARE DISPLAY REGISTER 
jiTRY TO REFERENCE HARDWARE SWR 
J {BRANCH IF NO TIMEOUT TRAP OCCURRED 
i:AND THE HARDWARE SWR IS NOT = -1 
651 s sBRANCH IF NO TIMEOUT 

#65*. (SP) J {SET UP FOR TRAP RETURN 



#64*,a#ERRVEC 
«OSWR,SWR 
#OOISP. DISPLAY 
#-1.9SWR 
66$ 



*SWREG.SWR {{POINT TO SOFTWARE SWR 

#DISPREGiDISPLAY 

(SP)»,8#eRRVEC {{RESTORE ERROR VECTOR 



$PASS 

#APTSIZE.*ENVM 
67* 

«ISWREG.SWR 



{ {CLEAR PASS COUNT 
{{TEST USER SIZE UNDER APT 
{{YES. USE NON-APT SWITCH 
{{NO, USE APT SWITCH REGISTER 



GET VALUE FOR SOFTWARE SWITCH REGISTER 



9M2 
68$ 

»ENV.«1 
681 

SWR,#SWREG 
69« 

691 

#1.IAUT06 

«6IT4!6IT5.9SWR 
2$ 

#6IT0,$DEVM 

#6IT3!BIT5.8SWR 

31 

#6IT1.*DEVM 



{{ARE WE RUmiNG UNDEk XXDP/ACT? 
{{BRANCH IF YES 
{{ARE WE RUNNING Ulf}ER APT? 
{ {BRANCH IF YES 

{{SOFTWARE SWITCH REG SELECTED? 

{ {BRANCH IF NO 

{{GET SOFT-SWR SETTINGS 



{ { 



SET AUTO-MQOe INDICATOR 



IS SLUl TO BE TESTED , 
IF EITHER BIT IS SET THEN DON'T TEST IT 
SET DEVICE FLAG TO TEST SLUl 
jlS SLU2 TO BE TESTED 

{IF EITHER BIT IS SET THEN DON'T TEST IT 
{SET DEVICE FLAG TO TEST SLU2 
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GET VALUE FOR SOFTWARE SWITCH REGISTER 



1610 
1611 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
162S 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 
1659 
1660 
1661 
1662 
1663 
1664 
1665 



003376 
003404 
003406 
003414 
003422 
003424 



003430 
003432 
003440 
003444 
003452 
003456 
003460 
003462 
003466 
003470 
003472 



003476 
003500 
003506 
003512 
003520 
003524 
003526 
003530 
003534 
003536 
003540 



003544 
003546 
003554 
003562 
003564 
003570 
003572 
003576 
003602 
003606 



032777 
001003 
052737 
032737 
001002 
000137 



000004 
012737 
013703 
012737 
005777 
000405 
022626 
004737 
000001 
000000 
010337 



000004 
012737 
013703 
012737 
005777 
000405 
022626 
004737 
000002 
000000 
010337 



000004 
012737 
032737 
001405 
005737 
001402 
000137 
005077 
105777 
100011 



000100 175434 

000004 001156 

000001 001156 

003660 



3$; 
4$: 



BIT 
BNE 
BIS 
BIT 
BNE 
JMP 



«BIT6,9SWR 
4$ 

«BIT2.»DEVM 

MITO.tDEVH 

TSTl 

ID 



lis LTC TO BE TESTED 

jIF BIT IS SET THEN DON'T TEST IT. 

SET DEVICE FLAG TO TEST LTC 

IS SLUl UNDER TEST 

IF YES TEST XMIT REG. BEFORE TYPING TITLE 
IF NO SKIP TESTS AND TYPE IT NOW 



000001 001104 
000004 

003460 000004 
177306 



013304 
000004 



: .^t************************************************************* 

:*TEST 1 TEST ABILITY TO ACCESS SLUl TCSR 

TSTl: SCOPE 

n.UESTN jjSET TEST NUMBER IN APT MAIL BOX 

M4.R3 jSAVE TIMEOUT VECTOR 

#l$.a#4 J SET UP TIMEOUT VECTOR 

aCTdSR ; REFERENCE THE XMIT COMMAND/STATUS REG. 

2i ; GO TO END OF TEST 

(SP)*.(SP)* ;RESTORE SP AFTER TIMEOUT 
PC,$ATY4 j:0NLY REPORT A FATAL ERROR 

stTHE ERROR NUMBER (FROM APT LIST) 



II 



21 1 



MOV 
MOV 
MOV 
TST 
BR 
CMP 
JSR 
1 

HALT 
MOV 



R3 1 



: RESTORE TIMEOUT VECTOR 



♦TEST 2 TEST ABILITY TO ACCESS SLUl TBUF 



000002 001104 
000004 

003526 000004 
177242 



013304 
000004 



TST2: 



1$: 



2*: 



SCOPE 
MOV 
MOV 
MOV 
TST 
BR 
CMP 
JSR 
2 

HALT 
MOV 



#2.ITESTN 

8#4.R3 

«1(.8M 

8CTBUF 

21 

(SP)».CSP)* 
PC,*ATY4 



R3.SM 



j:SET TEST NUMBER IN APT MAIL BOX 

;SAVE TIMEOUT VECTOR 

;SET UP TIMEOUT VECTOR 

jREFERENCE TJC XMIT BUFFER 

iGO TO END OF TEST 

I RESTORE SP AFTER TIMEOUT 

::QN.Y REPORT A FATAL ERROR 

5;THE ERROR NUMBER (FROM APT LIST) 

;RESTORE TIMEOUT VECTOR 



000003 001104 
000001 001120 

001106 

004402 
177164 
177156 



5 ♦TEST 3 TEST SLUl TCSR BIT7(00NE) aEARS WHEN XBUF IS LOADED 
TST3: SCOPE 

MOV ♦3,*TESTN i;SET TEST NUWER IN APT MAIL BOX 

BIT «1,8*IENV iARE UE RUNNING UNDER APT 

BEQ 70» }IF NO THEN DO TEST 

TST 8#*PASS ;IS THIS FIRST PASS 

BEQ 701 ;IF YES THEN DO THIS SERIES OF TESTS 

JMP SLU2RT I IF NO THEN SKIP THIS SERIES OF TESTS 

70»: CLR aCTBUF jLOAD XBUF 

TSTB aCTCSR ; CHECK DONE 

^* iFILfsECOND BUI-FER. BECAUSE REFRESH COULD CAUSE 

J FIRST TEST TO FAIL 



G3 
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GET VALUE FOR SOFTWARE SUITCH REGISTER 



SEQ 0032 



1666 


003610 


005077 


177152 




1667 


003614 

w wvx~ 


105777 


177144 




166d 


003620 


100004 






1669 


003622 


004737 


013304 




1670 


003626 


000003 






1671 


003630 


000000 






1672 


003632 


005000 






1673 


003634 


105777 


177124 




1674 


003640 


100407 






1675 


003642 


005200 






1676 


003644 


001373 






1677 


003646 


004737 


013304 




1678 


003652 


000004 






1679 


003654 


000000 






1680 


003656 


000416 






1681 










1682 










1683 


003660 


023737 


000042 


000046 


1684 


003666 


001412 






1685 


003670 


005737 


001106 




1686 


003674 


001007 






1687 


003676 


005737 


001110 




1688 


003702 


001004 






1689 


003704 


104401 






1690 


003706 


025476 






1691 


003710 


104401 






1692 


003712 


025510 






1693 


003714 








1694 










1695 










16% 










1697 










1698 


003714 


000004 






1699 


003716 


012737 


000004 


001104 


1700 


003724 


032737 


000001 


001156 


1701 


003732 


001002 






1702 


003734 


000137 


004402 




1703 


003740 








1704 


003740 


005077 


177022 




1705 


00?""W 


105777 


177014 




170*. 


0O3750 


100375 






1707 


003752 


005077 


177010 




1708 


003756 


000240 






1709 


003760 


000005 






1710 


003762 


105777 


176776 




1711 


003766 


100401 






1712 










1713 


003770 


104005 






1714 










1715 










1716 










1717 










1718 










1719 










1720 


003772 


000004 






1721 


003774 


012737 


000005 


001104 



1$: 
2$: 



ID: 



6$: 



CLR 

TSTB 

BPL 

JSR 

3 

HALT 

CLR 

TSTB 

BMI 

INC 

BNE 

JSR 

4 

HALT 
BR 



CMP 

BEQ 

TST 

BNE 

TST 

BNE 

TYPE 

Ml 

TYPE 
M2 



aCTBUF 
aCTCSR 

u 

PC.*ATY4 



RO 

aCTCSR 
ID 
RO 
2i 

PC,*ATY4 



TST4 



9M2.M46 
6t 

JPASS 
f>i 

$DEVCT 
6$ 



FILL DOUBLE BUFFER 
CHECK DONE 
BR IF CLEAR 

:;ONLY REPORT A FATAL ERROR 

:;THE ERROR NUMBER (FROM APT LIST) 
TCSR "DONE" NOT CLEARED UITH TBUF FULL 
CLEAR TIMER 
CHECK FOR XMIT DONE 
IF DONE SETS. BR TO END OF TEST 
INCREMENT TIMER 
BR IF TIMER NOT DONE 

i:ONLY REPORT A FATAL ERROR 

;5THE ERROR NUMBER (FROM APT LIST) 

:BR TO NEXT TEST, AND SKIP THE TYPEOUT THAT FOLLOUS 
: BECAUSE OF THIS FAILURE 

UNDER ACT117 

IF YES. SKIP IDENT. TYPEOUT 
IS THIS THE FIRST PASS? 

IF NOT BR TO NEXT TEST £ SKIP THE IDENTIFICATION TYPEOU 

IS THIS THE FIRST SUBPASS7 

IF NOT. BRTO NEXT TEST 

TYPE PROGRAM INOENTIFICATION 

{TYPE NUMBER OF DEVICES UNDER TEST 



J ♦TEST 4 TEST THAT SLUl TCSR "DONE" SETS WITH RESET 

; 

TST4: SCOPE 

jsSET TEST NUTBER IN APT MAIL BOX 
;00 THESE TESTS FOR THIS DEVICE? 
»F YES CONTINUE WITH TESTS 
J IF NO GO TO START OF NEXT SET OF TESTS. 



hWV 
BIT 
BNE 
JMP 



#4,$TESTN 

«eiTo.a«$DEvn 

99* 

SLU2RT 



99*: 
1$: 



CLR 

TSTB 

BPL 

CLR 

NOP 

RESET 

TSTB 

BMI 

ERROR 



8CTBUF 
8CTCSR 
U 

aCTBUF 



SCTCSR 
TST5 



jLOAD TRANSMIT BUFFER 
{UAIT FOR DONE 

iLOAD SECOND BUFFER 

: CLEAR DONE WITH RESET 

(CHECK FOR DONE SET 

tSR TO NEXT TEST IF DONE SET 

;TCSR "DONE" DOES NOT SET WITH RESET 



J ■ *************************************************************** 

s*TEST 5 TEST ABILITY TO ACCESS SLUl RCSR 

-.*************************************************************** 

TST5' SCOPE 

MOV #5.ITESTN uSET TEST NUMBER IN APT MAIL BOX 



-J 
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GET VALUE FOR SOFTUARE SUITCH REGISTER 



SEO 0033 



1722 


004002 


013703 


000004 


1723 


004006 


012737 


004022 


1724 


004014 


005777 


176740 


1725 


004020 


000402 




1726 








1727 


004022 


022626 




1728 


004024 


104006 
010337 




1729 


004026 


000004 


1730 








1731 








1732 








1733 








1734 








1735 


004032 


000004 




1736 


004034 


012737 


000006 


1737 


004042 


013703 


000004 


1738 


004046 


012737 


004062 


1739 


004054 


005777 


176702 


1740 


004060 


000402 




1741 








1742 


004062 


022626 




1743 


004064 


104007 




1744 


004066 


010337 


000004 


1745 








1746 








1747 








1748 








1749 








1750 








1751 








1752 








1753 


004072 


000004 




1754 


004074 


012737 


000007 


1755 


004102 


042777 


000100 


1756 


004110 


017703 


176672 


1757 


004114 


012777 


004144 


1758 


004122 


004737 


012356 


1759 


004126 


000340 




1760 


004130 


032777 


000100 


1761 


004136 


001404 




1762 


004140 


104014 




1763 








1764 


004142 


000402 




1765 








1766 


004144 


022626 




1767 


004146 


104015 




1768 








1769 








1770 


004150 


052777 


000100 


1771 


004156 


032777 


000100 


1772 


004164 


001001 




1773 








1774 


004166 


104016 




1775 








1776 








1777 


004170 


042777 


000100 



000004 





MOV 


9«4.R3 


J SAVE TIMEOUT VECTOR 




MOV 


«ll.9»4 


{SET UP TIMEOUT VECTOR 




TST 


9CRCSR 


{ACCESS RCSR 




BR 


2i 


jB^ TO END OF TEST 




CMP 


(SP)*.(SP)* 


.kESTORE SP after TIMEOUT 


ERROR 


6 


;CAN HOI ACCESS RCSR 


2»: 


MOV 


R3.S«4 


{RESTORE TIMEOUT VECTOR 



001104 
000004 



j*TEST 6 TEST ABILITY TO ACCESS SLUl RBUF 

; **************************************************************** 

TST6: SCOPE 



It: 
2$: 



MOV 
MOV 
MOV 
TST 
BR 

CMP 

ERROR 
MOV 



«6.*TESTN 
d04 1 R3 
«ll.8#4 
9CRBUF 
2$ 

(SP)*.(SP)» 
7 

R3 c WW 



{SET TEST NUMBER IN APT MAIL BOX 
SAVE TIMEOUT VECTOR 
SET UP TIMEOUT VECTOR 
ACCESS RBUF 
BR TO END OF TEST 

RESTORE SP AFTER TIMEOUT 
CAN NOT ACCESS RBUF 
RESTORE TIMEOUT VECTOR 



001104 
176654 

176664 
176626 



{*TEST 7 TEST THAT SLUl BIT6CXMIT INT EN) CAN BE SET 6 RESET 

TST7: SCOPE 

;SET TEST NUMBER IN APT MAIL BOX 



176606 
176600 



II: 



2»: 



MOV #7.»TESTN 

BIC «BIT6.8CTCSR 

MOV aCTVECT.R3 

MOV #l*.aCTVECT 

JSR PC.URPSW 

.WORD 340 

BIT #BIT6.8CTCSR 

BEQ 24 

ERROR 14 

BR 21 

CMP CSP)*.CSP)* 

ERROR 15 



BIS «IT6.8CTCSR 
BIT #6IT6,aCTCSR 
BNE 3( 



MAKE SURE BIT UNDER TEST IS INITIALIZED 
.SAVE XMIT VECTOR 

J SET UP INTERRUPT VECTOR FOR ERROR REPORT 
{SET PSU TO PRI0RITY«7 

J TEST BIT6 OF TCSR 
sBR IF ZERO 

{BIT6 IN TCSR NOT aEAR AFTER RESET 



{RESTORE SP AFTER INTERRUPT 

{XMIT INTERRUPT OCCURRED PRI0«7 

SET BIT6 OF TCSR 
TEST BIT6 OF TCSR 
BR. IF SET 



ERROR 16 



176566 3$; 



BIC 



#6IT6.8CTCSR 



{CANNOT SET BIT6 OF TCSR 
{CLEAR BIT6 OF TCSR 



15 
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1778 


004176 


032777 


000100 


176560 


1779 


004204 


001401 






1780 


004206 


104017 






1781 










1782 










1783 


004210 








1784 


004210 


0o27/7 


000100 


176546 


1785 


004216 


AAAAAC 






1786 




Uoe Iff 


000100 


176536 


1787 


0O4226 


AA1 AA1 






1788 










1789 




1040c0 






1790 










1791 




OlOo / f 


176550 




1792 










1793 










1794 










1795 










1796 










1797 




AAAAAA 






1798 




A1 37T7 


000010 


001104 


1799 






000100 


176504 


1800 




A1 77AT 


176522 




1801 




A1 3777 


004310 


176514 


1802 




AAA7T7 


012356 




1803 




AAATAA 






1804 




AT3777 


000100 


176456 


1805 




AA1 AAA 






1806 




1 AAA31 






1807 










1808 




AAAAA? 






1809 










1810 










1811 




1 AAA93 

104Uce 






1812 










1813 










1814 




A^0777 
UDe Iff 


000100 


176436 


1815 




Oo2 Iff 


000100 


176430 


1816 




AA1 AA1 






1817 










1818 




1 AAA^T 
104020 






1819 










1820 










1821 




AA0777 
yj'fe: til 


000100 


176416 


1822 




AT0777 

Ooe » f 1 


000100 


176410 


1823 




001401 






1824 










1825 


004352 


104024 






1826 










1827 










1828 


004354 








1829 


004354 


052/77 


000100 


176376 


1830 


004362 


000005 






1831 


004364 


032777 


000100 


176366 


1832 


004372 


001401 






1833 
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GET VALUE FOR SOFTUARE SWITCH REGISTER 



SEQ 0034 



4»: 



5*: 



BIT #Bit6.aCTCSR 
BEQ 4i 
ERROR 17 



BIS «BIT6.9CTCSR 

RESET 

BIT *BIT6.aCTCSR 

BEQ 5$ 



ERROR 20 

MOV R3,aCTVECT 



jTEST BIT6 OF TCSR 
;BR IF CLEAR 

J CANNOT CLEAR BIT6 OF TCSR 



SET Bn6 OF TCSR 
CLEAR BIT6 WITH RESET 
TEST BIT6 OF TCSR 
BR IF CLEAR 



: CANNOT CLEAR BIT6 OF TCSR UITH RESET 
;RESTORE XMIT VECTOR 



♦TEST 10 TEST THAT SLUl BIT6 OF RCSR CAN BE SET £ RESET 

i *************************************************************** 

TSTIO: SCOPE 

J I SET TEST NUMBER IN APT MAIL BOX 
{MAKE SURE BIT UNDER TEST IS INITIALIZED 
;SAVE RECEIVE VECTOR 

;SET UP INTERRUPT VECTOR FOR ERROR REPORT 
5 SET PSU TO PRIOHITY-7 



MOV 
BIC 
HOV 
MOV 
JSR 



2i: 



#10,»TESTN 
«BIT6,8CRCSR 
9CRVECT.R3 
«1$.8CRVECT 
PC.URPSU 
.UORD 340 
BIT «8IT6.SCRCSR 
6LQ 2i 
ERROR 21 

BR 21 

CMP CSP)».(SP)» 
ERROR 22 



BIS 4«IT6.8CRCSR 
BIT «8IT6.aCRCSR 
BNE 31 



3$: 



ERROR 23 



BIC «BIT6.9CRCSR 

BIT «BIT6.SCRCSR 

BEQ 4$ 

ERROR 24 



4$: 



BIS 
RESET 
BIT 
BEQ 



«BIT6,SCRCSR 

«BIT6.8CRCSR 
5* 



;TEST BIT6 OF RCSR 

iBIT6 OF RCSR NOT CLEAR AFTER RESET 

{RESTORE SP AFTER INTERRUPT 

sRCVR INTERRUPT UITH PRIORITY"? 

5 SET BIT6 OF RCSR 
;TEST BIT6 OF RCSR 
:8R. IF SET 

i CANNOT SET BIT6 OF RCSR 

; CLEAR BIT6 OF RCSR 
;TEST BIT6 OF RCSR 
;BR. IF CLEAR 

{CANNOT CLEAR BIT6 OF RCSR 



;SET BIT6 OF RCSR 
CLEAR BIT60F RCSR UITH RESET 
TEST BIT6 OF RCSR 
BR, IF CLEAR 



J3 
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1834 


004374 


104025 






1835 










1836 


004376 


010377 


176400 




1837 










1838 










1839 


004402 








1840 










1841 










1842 










1843 










1844 


004402 


000004 






1845 


004404 


012737 


000011 


001104 


1846 


004412 


032737 


000002 


001156 


1847 


004420 


001002 






1848 


004422 


000137 


C05626 




1849 


004426 








1850 


004426 


013703 


000004 




1851 


004432 


012737 


004446 


000004 


1852 


004440 


005777 


176310 




1853 


004444 


000402 






1854 


004446 


022626 






1855 


004450 


104031 






1856 


004452 


010337 


000004 




1857 










1858 










1859 










1860 










1861 










1862 










1863 


004456 


000004 






1864 


004460 


012737 


000012 


001104 


1865 


004466 


013703 


000004 




1866 


004472 


012737 


004506 


000004 


1867 


004500 


005777 


176252 




1868 


004504 


000402 






1869 


004506 


022626 






1870 


004510 


104032 






1871 


004512 


010337 


000004 




1872 










1873 










1874 










1875 










1876 










1877 


004516 


000004 






1878 


004520 


012737 


000013 


001104 


1879 


004526 


032737 


000001 


001120 


1880 


004534 


001403 






1881 


004536 


005737 


001106 




1882 


004542 


001022 






1883 


004544 








1884 


004544 


005077 


176206 




1885 


004550 


105777 


176200 




1886 


004554 


100006 






1887 










1888 










1889 


004556 


005077 


176174 





MACYll 30(1046) 24 MAR 86 10:44 PAGE 36 
GET VALUE FOR SOFTWARE SWITCH REGISTER 



SEO 0035 



5*: 



SLU2RT: 



ERROR 
MOV 



25 

R3.9CRVECT 



♦TEST 11 TEST ABILITY TO 

TSTll: SCOPE 

MOV #11 . *TESTN 

BIT «6IT1.9«$0EVM 

BNE 99i 

JMP LTCRT 

MOV S«4.R3 

MOV «1$.S«4 

TST aTCSR 

BR 2i 

CMP CSP)*.CSP)* 

ERROR 31 

MOV R3.8«4 



; CANNOT CLEAR BIT6 OF RCSR WITH RESET 
; RESTORE RECEIVE VECTOR 



********************************** 

ACCESS SLU2 TCSR 
********************************** 



99$: 



1$: 
2$: 



;SET TEST NUMBER IN APT MAIL BOX 

DO THESE TESTS FOR THIS DEVICE? 

F YES CONTINUE WITH TESTS 

IF NO GO TO START OF NEXT SET OF TESTS. 

SAVE TIMEOUT VECTOR 

SET UP TIMEOUT VECTOR 

REFERENCE THE XMIT COMMAND/STATUS REG. 

GO TO END OF TEST 
RESTORE SP AFTER TIMEOUT 
XMIT CSR ADDRESS DOES NOT RETURN SSYNC 
RESTORE TIMEOUT VECTOR 



*TEST 12 TEST ABILITY TO ACCESS SLU2 TBUF 

; *************************************************************** 

TST12: SCOPE 

MOV ♦12.*TESTN SET TEST NUMBER IN APT MAIL BOX 

MOV 904. R3 .-SAVE TIMEOUT VECTOR 

MOV OlLaM J SET UP TIMEOUT VECTOR 

TST aTBUF 5 REFERENCE THE XMIT BUFFER 

BR 2i ;G0 TO EIC OF TEST 

1$: CMP CSP)«,(SP)* {RESTORE SP AFTER TIMEOUT 

ERROR 32 {XMIT BUFFER ADDRESS DOES NOT REUTRN SSYNC 

2$: 10V R3.8M {RESTORE TIMEOUT VECTOR 

: :*************************************************************** 

{*TEST 13 TEST SLU2 TCSR BIT7(D0NE) aEARS W^€N XBUF IS LOADED 
• s*************************************************************** 

TST13: SCOPE 

MOV #13.»TESTN 

BIT n, 8#$ENV 

BEQ 70$ 

TST a#$PASS 

BNE TST 14 



701; 



{SET TEST NUMBER IN APT MAIL BOX 

ARE WE RUmiNG UNDER APT 

IF NO THEN DO TEST 

IS THIS FIRST PASS 

IF NO THEN SKIP TO NEXT TEST 



CLR 

TSTB 

BPL 



CLR 



9TBUF 
9TCSR 
U 



9TBUF 



LOAD XBUF 
CHECK DONE 
BR IF CLEAR 

FILL SECOND BUFFER, BECAUSE REFRESH COULD CAUSE 
{ FIRST TEST TO FAIL 
{FILL DOUBLE BUFFER 



I<3 
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GET VALUE FOR SOFTWARE SWITCH REGISTER 



SEO 0056 



low 




iUj f f f 


1 7A1 <LA 
X 1 OXDO 




1971 




1 /VWM 








0v#3 f W 








1 HOT 


UW*J f C 








l07* 




1 ft^777 

III 


1 7A1 ^ 
X rOXS'r 








1 nnA7'< 

XUIW r J 








nf\AtJ\o 








1 AQ7 




hftl X7T 






1 AQA 

lOTO 




XV^VO"* 






1 AQQ 




















































\A/HOXv 










\A/^QX£ 


01 P777 
VX^ 1 <J r 


000014 


001 104 






0^737 


000001 


001120 


1 <107 

X7V 1 




00140'^ 






X7VO 




00S737 


001106 

WXXww 




X7V7 


004634 


001015 






X 7X\/ 


004636 








141 1 

X7XX 


004636 


005077 


176114 

X f W X x~ 




141? 

X7XC 


00464? 


105777 

X III 


176106 

X ■ wx w 




X7X<J 


004646 


100375 






1414 


0046S0 


005077 


176102 




1415 


0046S4 


000240 






1416 


004656 


000005 






1417 


004660 


105777 

XW J I I f 


176070 

X > W ■ V 




1418 


004664 


100520 






1414 

X7X7 










14?0 




104035 






14?1 

X7CX 










14PP 

X7CC 










14P'^ 

X7C<J 










X7C^ 










149S 

X7C J 










1926 










1QP7 
X7C r 












V^^Q r C 


012737 

VXC f <J f 


000015 


wxx^^* 






01 T703 

vX^ f 


000004 








0127'^7 

vXC f J f 


004720 




X7<JX 


r xc 


005777 


176032 




X 




000402 






X 










X 7<J^ 




022626 






X 7<J^ 




lOAO'K 
XV^VOv 






1936 


004724 


010337 

VXV«/«/ 1 


000004 




1937 










1938 










1939 










1940 










1941 










1942 










1943 


004730 


000004 






1944 


004732 


012737 


000016 


001104 


1945 


004740 


013703 


000004 





1$: 

2$: 



TSTB 

BPL 

ERROR 

CLR 

TSTB 

BMI 

INC 

BNE 

ERROR 



STCSR 
U 
33 
RO 

STCSR 

TST17 

RO 

2$ 

34 



CHECK DONE 
BR IF CLEAR 

TCSR "DONE" NOT CLEARED WITH TBUF FULL 

CLEAR TIMER 

CHECK FOR XMIT DONE 

IF DONE SETS. BR TO NEXT TEST 

INCREMENT TIMER 

BR IF TIMER NOT DONE 

XMIT DONE BIT DOES NOT RESET AFTER TRANSMIT 



; **************************************************************** 

!*TEST 14 TEST THAT SLU2 TCSR "DONE" SETS WITH RESET 

; 

TST14: SCOPE 

;;SET TEST NUWErx IN APT MAIL BOX 
;ARE WE RUNNING UNDER APT 
;IF NO THEN DO TEST 
;IS THIS FIRST PASS 
;IF NO THEN SKIP TO NEXT TEST 



70$: 
II: 



MOV 


*14,$TESTN 


BIT 


«1. a«$ENV 


BEQ 


70* 


TST 


9«$PASS 


BNE 


TST15 


CLR 


STBUF 


TSTB 


STCSR 


BPL 


U 


CLR 


STBUF 


NOP 




RESET 




TSTB 


STCSR 


BMI 


TST20 


ERROR 


35 



;L0AD TRANSMIT BUFFER 
sUAIT FOR DONE 

;L0A0 SECOND BUFFER 

; CLEAR DONE WITH RESET 

.•CHECK FOR DONE SET 

;BR TO NEXT TEST IF DONE 3CT 

;TCSR "DONE" DOES NOT SET WITH RESET 



♦TEST 15 TEST ABILITY TO ACCESS SLU2 RCSR 
**************************************************************** 

TST 15* SCOPE 

MOV #15.$TESTN ;;SET TEST NUMBER IN APT MAIL BOX 

MOV a«4.R3 iSAVE TIHEOUT VECTOR 

MOV Wl.aM sSET UP TIHEOUT VECTOR 

TST 8RCSR {ACCESS RCSR 

BR 2$ ;BR TO END OF TEST 

U: CMP CSP)*.(SP)* iRESTORE SP AFTER TIMEOUT 

ERROR 36 sCAN NOT ACCESS RCSR 

2*: MOV R3.8#4 5 RESTORE TIMEOUT VECTOR 



.*«««««««*«*««******•♦♦♦♦♦♦♦♦♦♦♦♦**♦♦♦***•******•****•********** 

♦TEST 16 TEST ABILITY TO ACCESS SLU2 RBUF 

;♦♦♦♦**«*************♦♦♦*♦•*♦••♦♦•♦••*******••***********♦****** 

TST16: SCOPE 

MOV #16.ITESTN ;;SET TEST NUMBER IN APT MAIL BOX 

MOV a#4.R3 J SAVE TIMEOUT VECTOR 



L3 
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1946 


004744 


012737 


004760 


000004 


'947 


004752 


005777 


175774 




1948 


004756 


000402 






1949 










1950 


004760 


022626 






1951 


004762 


104037 






1952 


004764 


010337 


000004 




1953 










1954 










1955 










1956 










1957 










195o 










1959 


004770 


000004 






1960 


004772 


A 4 ^^T^ 

012737 


000017 


001104 


1961 


005000 


Ail ^"7*7^ 

04277 f 


000001 


4 7C7il£ 

175746 


1962 


005006 


032 If f 


000001 


4 7C7ilA 

1 f5f40 


1965 


AACA4 A 
005014 


AA4 il A 4 
001401 






1964 


005016 


4 Ail AJIA 

104040 






1965 


AACA^A 

005020 


052 fif 


000001 


4 7C7^£ 

1 to idb 


1966 


AACA^£ 

005026 


032 Iff 


000001 


175720 


196 f 


AACATil 

005034 


AA4 AA4 
001001 






1966 


AACAT£ 

005036 


4 Ail AJi 4 
104041 






1969 


AACAJI A 

005O40 


Ail ^1T1 
04^ f t f 


AAAAAI 

OOOOOl 


1 r5 '06 




AACAil£ 


032 fit 


OOOOOl 


4 7C7AA 
1 f5 fOO 




AACAC^ 

005054 


AA4 il A4 
001401 








AACAC£. 

0U505O 


4 Ail Ail ^ 

104042 








AACA£^ 










AACA£.A 


03^ fif 


OOOOOl 


AA4 4 OA 
001120 




AACA£^ 

005066 


001403 






ly /O 


AACA^A 

005070 


005737 


001 lOo 




i Q"77 
19 f f 


AACA'7il 

0050 f 4 


AA4 A4 il 
001014 






19 re 


0050 r6 








19 f9 


0050 r6 


052 '77 


OOOOOl 


4 7C£.CA 

lr5650 


19B0 


005104 


AAAAAC 
000005 






1981 


AAP 1 A£ 

005106 


032 tit 


OOOOOl 


4 7C£iiA 

1 f5o40 


19o^ 


AACI 1 A 

005114 


AA4 4 Ail 

001404 






1905 


AAC 1 1 £ 

005116 


Ail^^^"? 

042 1 1 f 


AAAAA4 
OOOOOl 


175630 


1 QA4 

l704 


AAC1 ^A 

0051<:4 


4 A^A^T 

104043 






1903 










1906 










1907 










1900 










1909 










4 AAA 
1990 


AAC 1 

005126 


AAAAAil 

000004 






4 AA4 

1991 


AAC 4 TA 

005130 


012737 


000020 


001104 








<WM AA 


1 7RA1 A 
1 f 3010 


1993 


005144 


017703 


175626 




1994 


005150 


012777 


005200 


175620 


1995 


005156 


004737 


012356 




1996 


005162 


000340 






1997 


005164 


032777 


000100 


175562 


1998 


005172 


001404 






1999 


005174 


104044 






2000 










2001 


005176 


000402 







MACYll 30(1046) 24 MAR 86 10:44 PAGE 38 
GET VALUE FOR SOFTWARE SWITCH REGISTER 



1»: 

2i: 



iEO 0037 



MOV 


«ll.8«4 


;SET UP TIMEOUT VECTOR 


TST 


9R6UF 


: ACCESS RBUF 


BR 


2$ 


iBR TO END OF TEST 


CMP 


(SP)*.(SP)* 


; RESTORE SP AFTER TIMEOUT 


ERROR 


37 


iCAN NOT ACCESS RBUF 


MOV 


R3,8«4 


{RESTORE TIMEOUT VECTOR 



;;*♦*** 

i*TEST 
;!**♦** 

TST17: 



17 TEST SLU2 BITOC BREAK BIT) CAN BE SET £ CLEARED £ RESET 

********************************************************** 

sSET TEST NUMBER IN APT MAIL BOX 
MAKF SURE BIT UNDER TEST IS INITIALIZED 
CHEC . BITO OF TCSR aEAR 
BR IF CLEAR 

BITO WAS NOT CLEAR AFTER RESET 
SET BITO IN TCSR 
TEST BITO OF TCSR 
iBR IF SET 

5 BITO OF TCSR WILL NOT SET 
{CLEAR BITO OF TCSR 
I TEST BITO OF TCSR 

;BITO OF TCSR WILL NOT CLEAR 

:ARE WE RUtMING UNDER APT 
jIF NO THEN DO TEST 
{IS THIS FIRST PASS 
;IF NO THEN SKIP TO NEXT TEST 

:SET BITO IN TCSR 
jaEAR BITO WITH RESET 
.•TEST BITO aEAR 

*BR IF CLEAR 
{CLEAR BITO. TO PRINT ERROR 
{RESET DID NOT aEAR BITO OF TCSR 



; ;*************************************************************** 

{♦TEST 20 TEST THAT SLU2 BIT6(XMIT INT EN) CAN BE SET £ RESET 

• .*************************************************************** 

TST20: SCOPE 

{SET TEST NUMBER IN APT MAIL BOX 



2$; 



3*! 



70$ i 







MOV 


#17 JTESTN 


BIC 


06IT0 aTCSR 


BIT 


#6IT0,9TCSR 


BEQ 


1* 


ERROR 


40 


BIS 


*eiT0.8TCSR 


BIT 


«6IT0. aTCSR 


BNE 


2* 


ERROR 


41 


BIC 


WITO.STCSR 


BIT 


«eiTO. aTCSR 


BEQ 


31 


ERROR 


42 


BIT 


#1, a»IENV 


BEQ 


70i 


TST 


8»»PASS 


BNE 


TST20 


BIS 


«BIT0. aTCSR 


RESET 


BIT 


•BITO. aTCSR 


BEQ 


TST20 


BIC 


«eiT0.8TCSR 


ERROR 


43 



MOV 
BIC 
MOV 
MOV 
JSR 

BIT 
BEQ 
ERROR 

BR 



#20,$TESTN 
«eit6,aTCSR 
8TVECT.R3 
#1$.8TVECT 
PC.WRPSW 
.WORD 340 
«eiT6, aTCSR 
21 



2« 



MAKE SURE BIT UNDER TEST IS INITIALIZED 
SAVE XMIT VECTOR 

SET UP INTERRUPT VECTOR FOR ERROR REPORT 
{SET PSW TO PRIORITY-7 

{TEST BIT6 OF TCSR 
{BR IF ZERO 

}BIT6 IN TCSR NOT CLEAR AFTER RESET 



M3 
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GET VALUE FOR SOFTWARE SWITCH REGISTER 



0038 



2002 










2003 


005200 


022626 






2004 


005202 


104045 






2005 










2006 










2007 


005204 


052777 


000100 


175542 


2008 


005212 


032777 


000100 


175534 


2009 


005220 


001001 






2010 










2011 


005222 


104046 






2012 










2013 










2014 


005224 


042777 


000100 


175522 


2015 


005232 


032777 


000100 


175514 


2016 


005240 


001401 






2017 


005242 


104047 






2018 










2019 










2020 


005244 


032737 


000001 


001120 


2021 


005252 


001403 






2022 


005254 


005737 


001106 




2023 


005260 


001011 






2024 


005262 








2025 


005262 


052777 


000100 


175464 


2026 


005270 


000005 






2027 


005272 


032777 


000100 


175454 


2028 


005300 


001401 






2029 










2030 


005302 


104050 






2031 










2032 


005304 


010377 


175466 




2033 










2034 










2035 










2036 










2037 










2038 


005310 


000004 






2039 


005312 


012737 


000021 


001104 


2040 


005320 


042777 


000100 


175422 


2041 


005326 


017703 


175440 




2042 


005332 


012777 


005362 


175432 


2043 


005340 


004737 


012356 




2044 


005344 


000340 






2045 


005346 


032777 


000100 


175374 


2046 


005354 


001404 






2047 


005356 


104051 






2048 










2049 


005360 


000402 






2050 










2051 


005362 


022626 






2052 


005364 


104052 






2053 










2054 










2055 


005366 


052777 


000100 


175354 


2056 


005374 


032777 


000100 


175346 


2057 


005402 


001001 







1$: 



2$: 



CMP 
ERROR 



BIS 
BIT 
BNE 



(SP)«,(SP)* 
45 



«eiT6.9TCSR 
WIT6.STCSR 
3* 



ERROR 46 



3$; 



4$: 



70$ I 



5»: 



BIC 
BIT 
BEQ 
ERROR 



BIT 
BEQ 
TST 
BNE 

BIS 
RESET 
BIT 
BEQ 

ERROR 

nov 



«IT6.8TCSR 

«6IT6,aTCSR 

41 

47 



«l.a«$ENV 

70* 

MIPASS 
5* 

«IT6,8TCSR 

«BIT6.aTCSR 
5* 

50 

R3.aTVECT 



{RESTORE SP AFTER INTERRUPT 

;XmT INTERRUPT OCCURRED PRIG- 7 

:SET BIT6 OF TCSR 
5 TEST BIT6 OF TCSR 
sBR. IF SET 

: CANNOT SET BIT6 OF TCSR 

J CLEAR BIT6 OF TCSR 
sTEST BIT6 OF TCSR 
iSR IF CLEAR 

; CANNOT CLEAR BIT6 OF TCSR 

:ARE UE RUfMING UNDER APT 

sIF NO THEN DO TEST 

:IS THIS FIRST PASS 

;IF NO THEN SKIP TO EM) OF TEST 

jSET BIT6 OF TCSR 
;aEAR BIT6 WITH RESET 
;TEST BIT6 OF TCSR 
:BR IF aEAR 



{CANNOT aEAR BIT6 OF TCSR WITH RESET 
J RESTORE )miT VECTOR 



**************************************************************** 

♦TEST 21 TEST THAT SLU2 BIT6 OF RCSfi CAN BE Sa 6 RESET 

TST21: SCOPE 

uSET TEST NUMBER IN APT MAIL BOX 

MAKE SURE BIT UNDER TEST IS INITIALIZED 
SAVE RECEIVE VECTOR 

SET UP INTERRUPT VECTOR FOR ERROR REPORT 
SET PSW TO PRIGRITY-7 



MOV 
BIC 
MOV 
MOV 
JSR 



II; 



2$: 



BIT 
BEQ 
ERROR 

BR 

CMP 
ERROR 



BIS 
BIT 
BNE 



#21,ITESTN 
«eiT6.aRCSR 
WVECT.R3 
«ll.aRVECT 
PC.WRPSW 
.WORD 340 
«6IT6.aRCSR 
2« 
51 

21 

(SP)*.(SP)» 
52 



«6IT6.aRCSR 
«6IT6.aRCSR 
31 



J TEST BIT6 OF RCSR 

}BIT6 OF RCSR NOT CLEAR AFTER RESET 

J RESTORE SP AFTER INTERRUPT 
;RCVR INTERRUPT WITH PRIORITY -7 

iSET BIT6 OF RCSR 
;TEST BIT6 OF RCSR 
;BR. IF SET 



N3 
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GET VALUE FOR SOFTWARE SUITCH REGISTER 



>EQ 0039 



2058 








2059 


005404 


104053 




2060 








2061 








2062 


005406 


042777 


000100 


2063 


005414 


032777 


000100 


2064 


005422 


001401 




2065 








2066 


005424 


104054 




2067 








2068 








2069 


0CJ426 


032737 


000001 


2070 


005434 


001403 




2071 


005436 


005737 


001106 


2072 


005442 


001011 




2073 


005444 






2074 


005444 


052777 


000100 


2075 


005452 


000005 




2076 


005454 


032777 


000100 


2077 


005462 


001401 




2078 








2079 


005464 


104055 




2080 








2081 


005466 


010377 


175300 


2062 








2063 








2064 








2065 








2086 








2087 








2068 


005472 


000004 




2089 


005474 


012737 


000022 


2090 


005502 


005077 


175244 


2091 


005506 


005000 




2092 


005510 


005077 


175242 


2093 


005514 


105777 


175230 


2094 


005520 


100403 




2095 


005522 


005200 




20% 


005524 


001373 




2097 


005526 


104056 




2098 








2099 








2100 


005530 


032737 


000001 


2101 


005536 


001403 




2102 


005540 


005737 


001106 


2103 


005544 


001005 




2104 


005546 






2105 


005546 


000005 




2106 


005550 


105777 


175174 


2107 


005554 


001401 




2108 








2109 


005556 


104057 




2110 








2111 


005560 


005777 


175166 


2112 








2113 









ERROR 53 

s CANNOT SET BIT6 OF RCSR 

175334 3»: BIC #BIT6.aRCSR ; CLEAR BIT6 OF RCSR 
175326 BIT 06IT6.aRCSR sTEST BIT6 OF RCSR 

BEQ 4$ sBR. IF CLEAR 

ERROR 54 

; CANNOT CLEAR BIT6 OF RCSR 

001120 41: BIT «l.a«$ENV :ARE UE RUNNING UNDER APT 

BEQ 701 ilF NO THEN DO TEST 

TST aOIPASS jIS THIS FIRST PASS 

BNE 5» .IF NO THEN SKIP TO END OF TEST 

175276 " BIS *BIT6.aRCSR iSET BIT6 OF RCSR 

RESET .CLEAR BIT60F RCSR UITH RESET 

175266 BIT #eiT6.aRCSR :TEST BIT6 OF RCSR 

BEQ 5* ;BR. IF CLEAR 

ERROR 55 

s CANNOT CLEAR BIT6 OF RCSR UITH RESET 
5*: MOV ftS.SRVECT {RESTORE RECEIVE VECTOR 



70$: 



;*TEST 22 TEST THAT SLU2 RCVR DONE (7) SET I QJEUR PROPtTlLY 



001104 



TST22: 



UDONE: 



SCOPE 
MOV 
CLR 
CLR 
CLR 
TSTB 
BMI 
INC 
BNE 
ERROR 



#22.»TESTN 

aPBUF 

RO 

aTBUF 
aRCSR 
II 
RO 

UDONE 
56 



.SET TEST NUMBER IN APT MAIL BOX 

INITIALIZE REGISTER BEFORE TESTING 

aEAR TIMER 

LOAD TRANSMIT BUFFER 

CHECK FOR RECEIVER DONE 

BR, IF DONE 

INCREMENT TIMER. IF NOT DONE 
CONTINUE UAIT IF TIKE REMAINS 

{RECEIVER DOr€ NEVER SET 



001120 1»: 



701: 



21: 



BIT *1,S#»ENV 

BEQ 70( 

TST a#$PASS 

BNE 2$ 

RESET 

TSTB SRCSR 

BEQ 2« 

ERROR 57 

TST aRBUF 



:ARE UE RUTMING UTOER APT 

;IF NO T«N DO TEST 
lis THIS FIRST PASS 
:IF NO l¥Bi SKIP TO END OF TEST 

s CLEAR DONE UITH RESET 
2 CHECK FOR DONE CLEAR 



: RESET DID NOT aEAR RCVR DONE 
: CLEAR RECEIVER BUFFER 



B4 
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2114 










2115 










2116 










2117 










2116 


005564 


000004 






2119 


005566 


012737 


AAAA^V 

000023 


AA1 1 Ail 

001104 


2120 


005574 


005077 


175152 




2121 


005600 


AAf A^^ 

005077 


175152 




2122 


005604 


105777 


4 ii A 

175140 




2123 


005610 


100375 






2124 


AAC£ 4 ^ 

005612 


A1 T^AA 

017700 


1 Til 

175134 




2125 


AAC£ 4 £ 

005616 


105777 


175126 




^4 ^£ 

2126 


AAC£ 

005622 


AA1 AA1 

001401 






2127 


005624 


1 AAA^A 

104060 






2120 










2129 


005626 








2130 










































UU30eO 








cm 


UU300V 


A1 37T7 


AAAA3A 
000024 


AA1 1 AA 
001104 




UU30J0 


A'X37T7 
Oo2 Ijf 


OOOOU4 


AA1 1 C& 


01 


W3044 


AA1 AA3 
001002 






oi 


V/03D4O 


AAA1 V7 


AA&I AA 
OODIOO 




01 TO 


AAC&C3 








oi A/\ 


/V\CAC3 
<A003e 


A1 T7AT 
013/03 


AAAAAA 
000004 




oi ^1 


003030 


A1 37T7 

012/3/ 


AAC&73 
0O3O/2 


AAAAAA 
000004 


31 A3 


003OO4 


AAC7'7'7 

0057 / / 


1 7C1 AA 

1 /3l00 




31 41 


U03o /O 


AAAiiA3 

O0O402 






31 AA 










31 AC 


003O r2 


A33£.3£. 

022d2o 






31 A£. 


003O74 


1 AAA^I 

104061 






31 A^ 










31 AS 


AACil7& 

003O7O 


01033 f 


AAAAAA 
000004 




31 AtX 










31 










31 CI 










31 C3 










31 CT 


005/02 


AAAAAil 

000004 






31 C4 


005704 


A1 37T'7 

012737 


AAAA3C 

000023 


AA1 1 Ail 

001104 


31 CC 


AACTI 3 
003 '12 


Ail 3*7*77 
042/ / / 


AAA1 AA 
000100 


1 7CACA 

175050 


2156 


005720 


A1 ^^AT 

017703 


175066 




213/ 


005724 


A1 ^7^^ 

012777 


AAC7Cil 

005754 


1 7CAA.A 

175060 


31 CO 

2130 


005732 


AAJI 7*17 

004737 


A1 ^TC£ 

012356 




^1 CO 

2159 


005736 


AAAT4 A 

000340 






31 

clou 


003 /40 


AT3777 
032 / / / 


AAA1 AA 

OOOlOO 


1 7CA30 

1 /5022 


2161 


005746 


001404 






2162 


005750 


104062 






2163 










2164 


005752 


000402 






2165 










2166 


005754 


022626 






2167 


005756 


104063 






2168 










2169 











MACYll 30(1046) 24-MAR-86 10:44 PAGE 41 
GET VALUE FOR SOFTUARE SWITCH REGISTER 



:*TEST 23 TEST SLU2 THAT READING RBUF CLEARS RECEIVER DONE 

TST23: SCOPE 

_ ^^^^ ^^g^ NUMBER IN APT MAIL BOX 

INITIALIZE REGISTER BEFORE TESTING 
;LOAD TRANSMITTER 
sUAIT FOR RECEIVER DONE 



£0 OO40 



MOV 
CLR 
CLR 
TSTB 
BPL 
MOV 
TSTB 
6EQ 
ERROR 



«23.»TESTN 
8RBUF 
9TBUF 
aRCSR 
1» 

aRBUF.RO 
aRCSR 
TST24 
60 



LTCRT: 



sREAD RECEIVE BUFFER 

: CHECK FOR RECEIVE DONE CLEAR 

sBR. IF CLEAR TO NEXT TEST 

i READING RBUF DID NOT CLEAR RCVR DONE 



!*TEST 24 TEST ABILITY TO ACCESS LKS 

• **************************************************************** 

TST24: SCOPE 

;SET TEST NUWER IN APT MAIL . BOX 



99*! 



II: 



21: 



MOV 024.ITESTN 

BIT «6IT2,9«$DEVM 

BNE 991 

JMP UNIQUE 

MOV 8#4.R3 

MOV «ll.8*4 

TST SLKS 

BR 2i 

CMP (SP)*.(SP)* 

ERROR 61 

MOV R3,0*4 



DO THESE TESTS FOR THIS DEVICE? 
F YES CONTINUE UITH TESTS 
IF NO GO TO START OF NEXT SET OF TESTS. 

J SAVE TIMEOUT VECTOR 
J SET UP TIMEOUT VECTOR 
; ACCESS LKS 

J NO TIMEOUT - BR TO END OF TEST 

{RESTORE SP AFTER TIMEOUT 
I CAN NOT ACCESS LKS 

{RESTORE TIMEOUT VECTOR 



{♦TEST 25 TEST THAT BIT6 OF LKS CAN BE SET 6 RESET 

TST25: SCOPE 

!;SET TEST NUMBER IN APT MAIL BOX 

{MAKE SURE BIT UNDER TEST IS INITIALIZED BEFORE TESTING 
{SAVE LINE aOCK VECTOR _ 
J SET UP INTERRUPT VECTOR FOR ERROR REPORT 
{SET PSW TO PRIORITY 7 



MOV 
BIC 
MOV 
WV 
JSR 



1$: 



BIT 
BEQ 
ERROR 

BR 

CMP 
ERROR 



#25.ITESTN 
#6lT6,aLKS 
aRTCVT,R3 
#1$.8RTCVT 
PC.URPSW 
.WORD 340 
«6IT6.aLKS 
21 
62 

21 

(SP)*.(SP)* 
63 



{TEST BIT6 OF LKS 

{BIT6 OF LKS NOT aEAR AFTER RESET 

{RESTORE SP AFTER INTERRUPT 
{LKS INTERRUPT UITH PRIORITY-7 



C4 
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GET VALUE FOR SOFTUARE SUITCH REGISTER 



'EQ 0041 



2170 


005760 


052777 


000100 


2171 


005766 


032777 


000100 


2172 


005774 


001001 




2173 








2174 


005776 


104064 




2175 








2176 








2177 


006000 


042777 


000100 


2178 


006006 


032777 


000100 


2179 


006014 


001401 




2180 


006016 


104065 




2181 








2182 


006020 


032737 


000001 


2183 


006026 


001403 




2184 


006030 


005737 


001106 


2185 


006034 


001011 




2186 


006036 






2187 


006036 


052777 


000100 


2188 


006044 


000005 




2189 


006046 


032777 


000100 


2190 


006054 


001401 




2191 








2192 


006056 


104066 




2193 








2194 


006060 


010377 


174726 


2195 


006064 


000405 




21% 








2197 








2198 


006066 


177560 




2199 


006070 


177564 




2200 


006072 


176500 




2201 


006074 


176504 




2202 


006076 


177564 




2203 








2204 








2205 


006100 






2206 








2207 








2208 








2209 








2210 


006100 


000004 




2211 


006102 


012737 


000026 


2212 


006110 


032737 


000001 


2L13 


006116 


001403 




2214 


006120 


005737 


001106 


2215 


006124 


001056 




2216 


006126 






2217 


006126 


012737 


000340 


2218 








2219 


006134 


012700 


006066 


2220 


006140 


012703 


006066 


2221 








2222 


006144 


012701 


000005 


222Z 


006150 


005033 




2224 


006152 


077102 




2225 


006154 


012770 


000100 



2*: 



BIS 
BIT 
BNE 



«IT6.aLKS 
«eiT6.SLKS 
3$ 



ERROR 64 



3$: 



4$: 



70$; 



BIC 
BIT 
BEQ 
ERROR 

BIT 
BEQ 
TST 
BNE 

BIS 
RESET 
BIT 
BEQ 



«BIT6.aLKS 

#BIT6,aLKS 

4$ 

65 

«1.9«4ENV 

701 

MIPASS 
51 

«6IT6,aLKS 

«6IT6.aLKS 
54 



ERROR 66 



5*; 



DADTBL: 



MOV 
BR 



.UORO 
.WORD 
.UORO 
.UORO 
TBLENO: .UORO 



UNIQUE: 



R3,aRTCVT 
UNIQUE 



177560 
177564 
176500 
176504 
177564 



SET BIT6 OF LKS 
TEST BIT6 OF LKS 
BR IF SET 



; CANNOT SET BIT6 OF LKS 

: CLEAR BIT6 OF LKS 
sTEST BIT6 OF LK 



s CANNOT CLEAR BIT6 OF LKS 

;ARE UE RUNNING UNDER APT 

}IF NO THEN DO TEST 

J IS THIS FIRST PASS 

;IF NO THEN SKIP TO END OF TEST 

;SET BIT6 OF LKS 

; CLEAR BIT6 OF LKS WITH RE'?ET 

;TEST BIT6 OF LKS 

:BR IF CLEAR 



5 CANNOT aEAR BIT6 OF LKS UITH RESET 
;RESTORE LINE CLOCK VECTOR 
iGO TO NEXT TEST 



;*TEST 26 UNIQUE INTERNAL ADDRESS TEST 

TST26: SCOPE 

1 1 SET TEST NU«ER IN APT MAIL BOX 
{ARE UE RUNNING UNDER APT 



70*: 



2%. 



SCOPE 




MOV 


*26.ITESTN 


BIT 


«1. MIENV 


BEQ 


701 


TST 


a*»PASS 


BNE 


TST27 


MOV 


•340. PS 


MOV 


«0ADTBL.R0 


MOV 


«0ADTBL.R3 


MOV 


#5,R1 


CLR 


9(R3)* 


SOB 


R1.2$ 


MOV 


«6IT6.a(R0) 



J IF NO THEN 00 TEST 
J IS THIS FIRST PASS 
J IF NO THEN SKIP TO NEXT TEST 

:UE UILL BE PLAYING WITH BIT6 
{SO LOCK OUT EXTRAINFOUS INTERRUPTS 
jGET LOCATION OF FIRST REGISTER ADDRESS 
{MAKE R3 POINT TO LOCATION OF FIRST 

{REGISTER ADDRESS 

{SET LOOP COUNTER TO aEAR ALL REG. 

{CLEAR A REGISTER 

{LOOP UNTIL ALL REGISTERS aEAREO 
{SET TEST BIT IN DEVICE REGISTERS 



D4 



CJKDIBO 11/238 SLU LTC REPR OIAG 
JKOIBO.Pll 24-MAR-86 09:57 



MACYll 30(1046) 24-MAR-86 10:44 PAGE 43 
GET VALUE FOR SOFTWARE SWITCH REGISTER 



^EQ 0042 



2226 


0C6162 


012701 


006066 




2227 


006166 


012702 


000005 




2228 


006172 


032731 


000100 




2229 


006176 


001006 






2230 


006200 


077204 






2231 


006202 


005030 






2232 










2233 


006204 


020027 


006076 




2234 


006210 


001421 






2235 


006212 


000752 






2236 


006214 


021041 






2237 


006216 


001413 






2238 


006220 


011037 


001020 




2239 


006224 


011137 


001022 




2240 


006230 


017037 


000000 


001024 


2241 


006236 


017137 


000000 


001026 


2242 


006244 


104072 






2243 










2244 


006246 


062701 


000002 




2245 


006252 


000752 






2246 


006254 


005000 






2247 


006256 


005200 






2248 


006260 


001376 






2249 










2250 


006262 








2251 










2252 










2253 










2254 










2255 


006262 


000004 






2256 


006264 


012737 


000027 


001104 


2257 


006272 


032737 


000001 


001120 


2258 


006300 


001405 






2259 


006302 


005737 


001106 




2260 


006306 


001402 






2261 


006310 


000137 


007016 




2262 


006314 








2263 


006314 


032737 


000001 


001156 


2264 


006322 


001002 






2265 


006324 


000137 


007016 




2266 


006330 








2267 


006330 


000005 






2268 


006332 


042777 


000100 


174424 


2269 


006340 


017703 


174442 




2270 


006344 


012777 


006370 


174434 


2271 


006352 


105777 


174406 




2272 


006356 


100375 






2273 


006360 


004737 


012356 




2274 


006364 


000140 






2275 


006366 


000402 






2276 










2277 


006370 


022626 






2278 


006372 


104074 






2279 










2280 


006374 


012777 


006414 


174404 


2281 


006402 


052777 


000100 


174354 



jGET LOCATION OF FIRST REGISTER ADDRESS 

sSET UP TEST LOOP COUNTER 

sis TEST BIT SET IN THIS REGISTER 

;IF YES GO SEE IF THERE IS AN ERROR 

J LOOP UNTIL ALL REGISTER CHECKED 

J CLEAR REGISTER JUST TESTED AND POINT 

{TO NEXT ONE 



; CONTINUE TESTING 

;DID WE COMPARE THE REGISTER TO ITSELF? 
ilF YES GET OVER ERROR CALL 
;IF NO SET UP ERROR INFORMATION 



s WRITE TO 1 INTERNAL ADDRESS MODIFIED 

{ANOTHER SO ADDRESS NOT UNIQUE 

s RESTORE POINTER 

I GET BACK IN TEST LOOP 



SLUIIT: 

;*TEST 27 TEST THAT SLUl XMIT INTERRUPTS ONLY WHEN ENABLED 
TST27: SCOPE 

MOV ♦27.4TESTN ;iSET TEST NUMBER IN APT MAIL BOX 

BIT #1,8#IENV sIF NOT [MOER APT 

BEQ 701 t THEN RUN THIS SERIES OF TESTS 

TST »#*PASS I ELSE IF FIRST PASS 

BEQ 70$ { THEN RUN ThESE TESTS 

JMP SLU2IT I ELSE DO NOT RUN THESE TESTS 





MOV 


«DA0TBL,R1 




MOV 


♦5.R2 


3$: 


BIT 


#6IT6.9(R1)* 




BNE 


5* 


4$: 


SOB 


R2.3( 




CLR 


S(R0)4 




TMP 


RO dTRI FND 




BEQ 


7$ 




BR 


1* 


5$: 


CMP 


(RO).-(Rl) 




BEQ 


6( 




MOV 


(RO).IGDADR 




MOV 


(Rl), »BDAOR 




MOV 


a(RO).$GOOAT 




MOV 


a(Rl}.)BDDAT 




ERROR 


72 


6$: 


ADD 


#2.R1 




BR 


4$ 


71: 


CLR 


RO 


81: 


INC 


RO 




BNE 


8« 



70*! 
99$: 

1$: 

2$: 
31: 



BIT «8IT0.8*$OEVH 

BNE 99» 

JMP SLU2IT 

RESET 

BIC #BIT6.8CTCSR 

MOV 8CTVECT.H3 

MOV *2I.8CTVECT 

TSTB aCTCSR 

BPL II 

JSR PC.WRPSU 

.WORD 140 

BR 31 

CMP (SP)«.(SP)* 

ERROR 74 

MOV #4$,aCTVECT 

BIS 46IT6.8CTCSR 



J 00 THESE TESTS FOR THIS DEVICE? 

if YES CONTINUE WITH TESTS 

! IF NO GO TO START OF NEXT SET OF TESTS. 

taEAR THE WORLD 

jaEAfi TRANSMIT INTERRUPT ENABLE 
I SAVE XMIT VECTOR 

jPOINT XMIT VECTOR TO ERROR REPORT 
:UAIT FOR DONE 

;SET PSW TO PRIORITY 3 



{RESTORE SP AFTER INTERRUPT 

sXMIT INTERRUPTS WITH INTERRUPT ENABLE CLEAR 
,SET XMIT VECTOR TO END OF TEST 
t ENABLE INTERRUPTS 



E4 
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GET VALUE FOR SOFTWARE SWITCH REGISTER 



.EO 0043 



2262 


006410 


000240 






2283 










2284 


006412 


104075 






2285 










2286 


006414 


042777 


000100 


174342 


2287 


006422 


022626 






2288 


006424 


010377 


174356 




2289 










2290 










2291 










2292 










2293 










2294 


006430 


000004 






2295 


006432 


012737 


000030 


001104 


22% 


006440 


042777 


000100 


174316 


2297 


006446 


004737 


012356 




2298 


006452 


000340 






2299 


006454 


017703 


174326 




2300 


006460 


012777 


006506 


174320 


2301 


006466 


105777 


174272 




2302 


006472 


100375 






2303 


006474 


052777 


000100 


1/4262 


2304 


006502 


000240 






2305 


006504 


000402 






2306 










2307 


006506 


022626 






2308 


006510 


104076 






2309 










2310 


006512 


042777 


000100 


174244 


2311 


006520 


012777 


006540 


174260 


2312 


006526 


004737 


012356 




2313 


006532 


000140 






2314 


006534 


000240 






2315 


006536 


000402 






2316 










2317 


006540 


022626 






2318 


006542 


104077 






2319 










2320 


006544 


010377 


174236 




2321 










2322 










2323 










2324 










2325 










2326 


006550 


000004 






2327 


006552 


012737 


000031 


001104 


2328 


006560 


042777 


000100 


174176 


2329 


006566 


017703 


174214 




2330 


006572 


017704 


174212 




2331 


006576 


012777 


006640 


174202 


2332 


006604 


012777 


000340 


174176 


2333 


006612 


004737 


012356 




2334 


006616 


000140 






2335 


006620 


105777 


174140 




2336 


006624 


100375 






2337 


006626 


052777 


000100 


174130 



NOP 

ERROR 

BIC 
CMP 
MOV 



75 

#eiT6.aCTCSR 

(SP)*,(SP)* 

R3.8CTVECT 



;XMIT DID NOT INTERRUPT 

; DISABLE INTERRUPTS 
{RESTORE SP AFTER INTERRUPT 
{RESTORE XMIT VECTOR 



*TEST 30 TEST SLUl XMIT INTERRUPTS DO NOT OCCUR WHEN DISABLED 

TST30: SCOPE 

ssSET TEST NUMBER IN APT MAIL BOX 
{DISABLE INTERRUPTS 
{SET PSW TO PRIOR. TY 7 



MOV 
BIC 
JSR 



21: 
31: 



41: 

51: 



«30.*TESTN 
*BIT6.aCTCSR 
PC.WRPSW 
.WORD 340 
MOV aCTVECT.R3 
MOV #2*.aCTVECT 
TSTB SCTCSR 
BPL II 

BIS «BIT6. SCTCSR 
NOP 

BR 31 

CMP (SP)».(SP)» 

ERROR 76 

BIC «6IT6. SCTCSR 

MOV #4I.SCTVECT 

JSR PC.WRPSW 

.UORO 140 

NOP 

BR SI 

CMP (SP)*,CSP)* 
ERROR 77 

MOV R3.SCTVECT 



{SAVE XMIT VECTOR 

{POINT XMIT VECTOR TO ERROR REPORT 
{WAIT FOR DONE 

{ENABLE INTEMtUPT 

{CONTINUE TEST 

{RESTORE SP AFTER INTERRUPT 

{XMIT INTERRUPTS AT PRIORITY* 7 
{aEAR INTERRUPT ENABLE 
{POINT XMIT VECTOR TO ERROR REPORT 
{SET PSW TO PRIORITY 3 

jBR TO END OF TEST-NO INTERRUPT 

{RESTORE SP AFTER INTERRUPT 

;XMIT INTERRUPT OCCURES WITH BIT6 aEAR 
{RESTORE XMIT VECTOR 



*TEST 31 TEST SLUl TRANSMITTER FOR DOUBLE INTERRUPTS 

TST31: SCOPE 

- ..SE: TEST NUMBER IN APT MAIL BOX 

{CLEAR INTERRUPT ENABLE 
{SAVE XMIT VECTOR 
{SAVE XMIT PSW VECTOR 
{SET UP XMIT VECTOR 
{SET PIO 7 AFTER INTERRUPT 
{SET PSW TO PRIORITY 3 



MOV 
BIC 
MOV 
MOV 
MOV 
MOV 
JSR 



II: 



TSTB 

BPL 

BIS 



#31.ITESTN 
«8IT6. SCTCSR 
SCTVECT.R3 
3CTPSW,R4 
#2I,SCTVECT 
#340.SCTPSW 
PC.WRPSW 
.WORD 140 
aCTCSR 
II 

«6IT6. SCTCSR 



{WAIT FOR DONE 
{ENABLE INTERRUPTS 



F4 
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GET VALUE FOR SOFTUARE SUITCH REGISTER 



SEQ 0044 



2330 


006634 


000e40 




2339 








2340 


006636 


1 f\A^ AA 




2341 








2342 


006640 


A03&0C 

0e<;oe6 




2343 


0UIK>4^ 


A1 3777 


nft<<i»7ft 


2344 


OOoeDO 




ftl OXKti. 


c343 




ftftfti Aft 




C040 




ftftft3Aft 




c54 ( 


UUDOOV 


ftA3777 
UHC f ' ' 


ftftfti ftft 


c54o 


uorooo 


ftftftAft3 
UUU4UC 




<:349 










n.V^7A 
V\JOO IV 


ft33^3l\ 
UccDcD 






nncjL70 

<A/Oo rc 


1 ftAI ftl 














/W^7J. 
UUDO 1^ 


ftl ftT77 


1 7A1 (V\ 


c3j4 


WD IKAJ 


ftl ft477 


17A10A 


















c3 J 1 








CO JO 












ftftftOftA 






K^Jyj two 




0000 '^3 

WW JC 


cOOi. 




yjHc Iff 


000100 




' cc 


0047'S7 


013'^Sft 

vXCO JV 


COOO 


r cD 








/Wi7Xrt 


01770'^ 


1 740'5? 






013777 

vXC r r f 


00700fc 


c jOO 


rtfV;7A3 
f He 


0*i3777 

V JC » » f 




cOO ' 


<W>7S0 


00S077 


17401P 


COOO 


00^7Sd 


1 0S777 
tit 


17A004 

X f "TVN^? 




<Wv7AD 


10077^ 




cO Iv 


A^7A3 
UUO lOC 


00S077 


17AOOO 
X • ■♦VW 




UUD r DO 


VA/H f O f 






ft<Vi773 
UUD / r c 


ftftfti Aft 






\AJO 1 rH 


ftftftSAft 




3T74 


KAJO f f O 


OA3777 


oonioo 


CO 1 J 




ftftftAft3 




3T7<i 
CO lO 








3T77 


UU 1 UUD 


ft33A3A 
UccDcD 




cO rO 




IftAlftS 
XU4XUe 




c3 17 










ftft7ft1 3 


ft'. 0X77 


1 7'X77ft 
XI Of IV 


cOOl 








cdoc 










007016 






2384 








2385 








2386 








2387 








2388 


007016 


000004 




2389 


007020 


012737 


000033 


2390 


007026 


032737 


000002 


2391 


007034 


001002 




2392 


007036 


000137 


010762 


2393 


007042 







174136 
174076 



2$: 



4$: 
5$: 



NOP 






iftft 
xw 


CHP 


(SP)*,(SP)* 


nuv 


AAt artvFrT 


JSR 


PC.URPSU 


.UORD 


140 


NOP 




BIC 


«6IT6.9CTCSR 


BR 


5$ 


CMP 


(SP)*,(SP)* 


ERROR 


101 


MOV 


R3.aCTVECT 


MOV 


R4.aCTPSU 



jXMIT INTERRUPT DID NOT OCCUR 
, RESTORE SP AFTER INTERRUPT 
{POINT XMIT VECTOR TO ERROR 
{SET PSU TO PRIORITY 3 

:GIVE TIME FOR ANY INTERRUPTS 
{DISABLE INTERRUPTS 
:BR TO END OF TEST 

{RESTORE SP AFTER INTERRUPT 

{XMIT RE -INTERRUPTED 
{RESTORE XMIT VECTOR 
{RESTORE XMIT PSU VECTOR 



001104 
174042 



174044 
174014 



♦TEST 32 TEST THAT SLUl XMIT INTERRUPT CLEARS WITH LOADING TBUF 

TST32: SCOPE 

" {{SET TEST NUMBER IN APT MAIL BOX 

{DISABLE INTERRUPTS 
{SET PSU TO PRIORITY 7 



MOV 
BIC 
JSR 



173760 



#32,*TESTN 
06IT6.9CTCSR 
PC.URPSU 
.UORD 340 
MOV aCTVECT,R3 
MOV #2l,aCTVECT 
BIS #8IT6.8CTCSR 
CLR aCTBUF 
1*: TSTB 8CTCSR 
BPL II 
CLR aCTBUF 
JSR PC.URPSU 

.UORD 140 

NOP 

BIC 06IT6.aCTCSR 
BR 3« 

21: CMP (SP)*.(SP)» 
ERROR 102 

31: MOV R3.aCTVECT 



{SAVE XMIT VECTOR 

{POINT XMIT VECTOR TO ERROR 

{ENABLE INTERRUPTS 

{LOAD TBUF 

{UAIT FOR DONE (INTERRUPT) 

{FILL SECOND BUFFER TO RESET INT. 
{ALLOW INTERRUPTS 

{GIVE TIME FOR ANY INTERRUPTS 
{DISABLE INTERRUPTS 
{BR TO END OF TEST 

{RESTORE SP AFTER INTERRUPT 

{LOADING TBUF DID NOT aEAR INTEi^RUPI 
{RESTORE XMIT VECTOR 



001104 
001156 



SLU2IT: 

;*»*»**»*»*********»»»»***»*****************»******************* 

♦TEST 33 TEST THAT SLU2 XMIT INTERRUPTS 0M.Y UHEN ENABLED 

.♦♦•**♦♦♦*♦»♦♦**♦*♦*♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦♦*•** 

tST33: SCOPE 



99$; 



MOV #33,$TESTN 

BIT «IT1.8#*DEVM 

BNE 991 

JMP LTCIT 



iSET TEST NUMBER IN APT MAIL BOX 
60 THESE TESTS FOR THIS DEVICE? 
F YES CONTINUE UITH TESTS _ 
IF NO GO TO START OF NEXT SET OF 



TESTS. 



G4 
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MACYll 30(1046) 24-MAR-86 10:44 PAGE 46 
GET VALUE FOR SOFTWARE SWITCH REGISTER 



SEQ 0045 



2394 


007042 


04277/ 


000100 


2395 


007050 


017703 


173722 


23% 


007054 


012777 


007100 


2397 


007062 


105777 


173666 


2398 


007066 


100375 




2399 


007070 


004737 


012356 


2400 


007074 


000140 




2401 


007076 


000402 




2402 








2403 


007100 


022626 




2404 


007102 


104116 




2405 








2406 


007104 


012777 


007124 


2407 


007112 


052777 


000100 


2408 


007120 


000240 




2409 








2410 


007122 


104117 




2411 








2412 


007124 


042777 


000100 


2413 


007132 


022626 




2414 


007134 


010377 


173636 


2415 








2416 








2417 








2418 








2419 








2420 


007140 


000004 




2421 


007142 


012737 


000034 


2422 


007150 


042777 


000100 


2423 


007156 


004737 


012356 


2424 


007162 


000340 




2425 


007164 


017703 


173606 


2426 


007170 


012777 


007216 


2427 


007176 


105777 


173552 


2428 


007202 


100375 




2429 


007204 


052777 


000100 


2430 


007212 


000240 




2431 


007214 


000402 




2432 








2433 


007216 


022626 




2434 


007220 


104120 




2435 








2436 


007222 


042777 


000100 


2437 


007230 


012777 


007250 


2438 


007236 


004737 


012356 


2439 


007242 


000140 




2440 


007244 


000240 




2441 


007246 


000402 




2442 








2443 


007250 


022626 




2444 


007252 


104121 




2445 








2446 


007254 


010377 


173516 


2447 








2448 








2449 









173704 
173714 



173664 
173634 



1$; 

2$: 
3$: 



BIC 

MOV 

MOV 

TSTB 

BPL 

JSR 

BR 

CMP 
ERROR 

MOV 
BIS 
NOP 



#BIT6,aTCSR 

aTVECT,R3 

#2».aTVECT 

aTCSR 

II 

PC.WRPSW 
.WORD 140 
3» 

(SP)*.(SP)* 
116 

04l,aTVECT 
«BIT6.STCSR 



ERROR 117 



173622 4$ : 



BIC 
CMP 
MOV 



«6IT6.STCSR 
CSP)*.CSP)» 
R3.STVECT 



} CLEAR TRANSMIT INTERRUPT ENABLE 
SAVE XMIT VECTOR 

POINT XMIT VECTOR TO ERROR REPORT 
WAIT FOR DONE 

J SET PSW TO PRIORITY 3 



J RESTORE SP AFTER INTERRUPT 

sXMIT INTERRUPTS WITH INTERRUPT ENABLE aEAR 
sSET XMIT VECTOR TO END OF TEST 
s ENABLE INTERRUPTS 



J XMIT DID NOT INTERRUPT 

{DISABLE INTERRUPTS 
{RESTORE SP AFTER INTERRUPT 
{RESTORE xniT VECTOR 



001104 
173576 



173600 
173542 



:*TEST 34 TEST SLU2 XMIT INTERRUPTS 00 NOT OCCUR WHEN DISABLED 

• . *************************************************************** 

TST34: SCOPE 

{{SET TEST HU«ER IN APT MAIL BOX 
(DISABLE INTERRUPTS 
{SET PSU TO PRIORITY 7 



MOV 
BIC 
JSR 



173524 
173540 



II: 

21: 
3$: 



41: 
51: 



MOV 

MOV 

TSTB 

BPL 

BIS 

NOP 

BR 

CMP 
ERROR 

BIC 
MOV 
JSR 

NOP 
BR 

CMP 
ERROR 

MOV 



#34.ITESTN 
«IT6,aTCSR 
PC.URPSU 
.WK> 340 
aTVECT,R3 
*2*,8TVECT 
aTCSR 
1) 

MIT6.8TCSR 
3$ 

(SP)».{SP)» 
120 

«6IT6.8TCSR 
•4».8TVECT 

PC.URPSW 
.WORD 140 

5» 

(SP)*.(SP)* 
121 

R3.8TVECT 



{SAVE XMIT VECTOR 

{POINT XMIT VECTOR TO ERROR REPORT 
{WAIT FOR DONE 



ENABLE INTERRUPT 



{CONTINUE TEST 

{RESTORE SP AFTER INTERRUPT 

J XMIT INTERRUPTS AT PRI0RITY«7 
{CLEAR INTERRUPT ENABLE 
{POINT XMIT VECTOR TO ERROR REPORT 
{SET PSW TO PRIORITY 3 

{BR TO END OF TEST-NO INTERRUPT 

(RESTORE SP AFTER INTERRUPT 

sXMIT INTERRUPT OCCURES WITH BIT6 CLEAR 
{RESTORE XMIT VECTOR 



H4 
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MACYll 30(1046) 24-MAR-e6 10:44 PAGE 47 
GET VALUE FOR SOFTUARE SWITCH REGISTER 



'AQ 0046 



















C*» JC 
















J** 


\AJ f cOv 






c*»J J 


f CvC 


vXC r J r 


WW J J 


C*» JO 




04P777 


vWX w 


?4S7 




017703 


173474 


C*v JO 












01P777 

vXC Iff 


007350 






012777 


000340 






004737 


012356 




007326 


000140 






007330 


105777 

fir 


173420 


?4M 


007334 


100375 






007336 


052777 


000100 


2466 


007344 


000240 




2467 








2468 


007346 


104122 




2469 








2470 


007350 


022626 




2471 


007352 


012777 


007400 


2472 


007360 


004737 


012356 


2473 


007364 


000140 




2474 


007366 


000240 




2475 


007370 


042777 


000100 


2476 


007376 


000402 




2477 








2478 


007400 


022626 




2479 


007402 


104123 




2480 








2481 


007404 


010377 


173366 


24P2 


007410 


010477 


173364 


24o3 








2484 








2485 








2486 








2487 


007414 


000004 




2488 


007416 


012737 


000036 


2489 


007424 


032717 


000001 


2490 


007432 


001403 




2491 


007434 


005737 


001106 


2492 


007440 


001046 




2493 


007442 






2494 


007442 


042777 

^HTt III 


000100 


2495 


007450 


004737 


012356 


24% 


007454 


000340 




2497 


007456 


017703 


173314 


2498 


007462 


012777 


007534 


2499 


007470 


052777 


000100 


2500 


007476 


005077 


173254 


2501 


007502 


105777 


173246 


2502 


007506 


100375 




2503 


007510 


005077 


173242 


2504 


007514 


004737 


012356 


2505 


007520 


000140 





001104 
173456 



173462 
173456 



173410 



s*TEST 35 TEST SLU2 TRANSMITTER FOR DOUBLE INTERRUPTS 

TST35: SCOPE 



1«: 



MOV 
BIC 
MOV 
MOV 
MOV 
MOV 
JSR 

TSTB 
BPL 
BIS 
NOP 



#35,$TESTN 

<«IT6,aTCSR 

aTVECT.R3 

8TPSU.R4 

#2$.aTVECT 

#340,STPSU 

PC.URPSU 

.WORD 140 

9TCSR 

U 

MIT6.9TCSR 



ERROR 122 



2«: 



4$: 
5$: 



CMP 

MOV 

JSR 

.UORO 

NOP 

BIC 

BR 

CMP 
ERROR 

MOV 
MOV 



(SP)*.(SP)* 
#4$,aTVECT 
PC.URPSU 
140 

«8IT6.9TCSR 
51 

(SP)».(SP)* 
123 

R3.aTVECT 
R4.aTPSU 



Si SET TEST NUMBER IN APT MAIL BOX 
i CLEAR INTERRUPT ENABLE 
iSAVE XMIT VECTOR 
;SAVE XMIT PSU VECTOR 
sSET UP XMIT VECTOR 
sSET PIO 7 AFTER INTERRUPT 
iSET PSU TO PRIORITY 3 

iUAIT FOR DONE 

{ENABLE INTERRUPTS 



:XMIT INTERRUPT DID NOT OCCUR 
: RESTORE SP AFTER INTERRUPT 
•.POINT XMIT VECTOR TO ERROR 
;SET PSU TO PRIORITY 3 

jGIVE TIME FOR ANY INTERRUPTS 
5 DISABLE INTERRUPTS 
; BR TO END OF TEST 

; RESTORE SP AFTER INTERRUPT 

;XMIT RE -INTERRUPTED 
; RESTORE XMIT VECTOR 
.•RESTORE XMIT PSU VECTOR 



001104 
001120 



173304 



173306 
173256 



;*TEST 36 TEST THAT SLU2 XMIT INTERRUPT aEARS VHTH LOADING TBUF 

• .****••******•*•************************************************ 

TST36: SCOPE 

~ } {SET TEST NUMBER IN APT MAIL BOX 

:ARE UE RiJNNING UNDER APT 
:IF NO THEN DO TEST 
;IS THIS FIRST PASS 
sIF NO THEN SKIP TO NEXT TEST 



70»: 



II: 



SCOPE 




MOV 


«36.$TESTN 


BIT 


»1. 9#$ENV 


BEQ 


70* 


TST 


a«IPASS 


BNE 


TST37 


BIC 


«IT6,8TCSR 


JSR 


PC.URPSU 




.UORD 340 


MOV 


aTVECT,R3 


MOV 


#2l.aTVECT 


BIS 


«6IT6.aTCSR 


CLR 


aTBUF 


TSTB 


aTCSR 


BPL 


u 


CLR 


aTBUF 


JSR 


PC.URPSU 




.UORD 140 



; DISABLE INTERRUPTS 
iSET PSU TO PRIORITY 7 

sSAVE XMIT VECTOR 

; POINT XMIT VECTOR TO ERROR 

{ENABLE INTERRUPTS 

;LOAD TBUF 

jUAIT FOR DONE (INTERRUPT) 

{FILL SECOND BUFFER TO RESET INT. 
{ALLOU INTERRUPTS 



14 



CJKDIBO 11/23B SLU LTC REPR OIAG 
JKOIBO.Pll 24-MAR-86 09:57 



2506 


007522 


000240 






2507 


007524 


042777 


000100 


173222 


2508 


007532 


000402 






2509 










2510 


007534 


022626 






2511 


007536 


104124 






2512 










2513 


007540 


005001 






2514 


007542 


005201 






2515 


007544 


001376 






2516 


007546 


005777 


173200 




2517 


007552 


010377 


173220 




2518 










2519 










2^' 
2' 










25..^ 










2523 










2524 










2525 


007556 


000004 






2526 


007560 


012737 


000037 


001104 


2527 


007566 


042777 


000100 


173160 


2528 


007574 


042777 


000100 


173146 


2529 


007602 


017703 


173164 




2530 


007606 


012777 


007636 


173156 


2531 


007614 


004737 


012356 




2532 


007620 


000140 






2533 


007622 


005077 


173130 




2534 


007626 


105777 


173116 




2535 


007632 


100375 






2536 


007634 


000402 






2537 










2538 


007636 


022626 






2539 


007640 


104125 






2540 










2541 










2542 


007642 


012777 


007662 


173122 


2543 


007650 


052777 


000100 


173072 


2544 


007656 


000240 




2545 


007660 


104126 






2546 










2547 










2548 


007662 


042777 


000100 


173060 


2549 


007670 


022626 




2550 


007672 


010377 


173074 




2551 










2552 










2553 










2554 










2555 










2556 


007676 


000004 






2557 


007700 


012737 


000040 


001104 


2558 


007706 


004737 


012356 




2559 


007712 


000340 




2560 


007714 


017703 


173052 




2561 


007720 


012777 


007752 


173044 



MACYll 30(1046) 24 MAR-86 10:44 PAGE 48 
GET VALUE FOR SOFTWARE SWITCH REGISTER 



21: 



SEQ 0047 



3$: 
4$: 



NOP 




2 GIVE TIME FOR ANY INTERRUPTS 


BIC 


#BIT6.aTCSR 


; DISABLE INTERRUPTS 


BR 


3* 


{BR TO END OF TEST 


CMP 


(SP)*.(SP?- 


{RESTORE SP AFTER INTERRUPT 


ERROR 


124 






{LOADING TBUF DID NOT CLEAR INTERRUPT 


CLR 


Rl 


{INITIALIZE LOOP COUNTER 


INC 


Rl 


{INCREMENT LOOP COUNTER 


BNE 


4$ 


i UNTIL LOOP COUNTER EQUALS 0 


TST 


aRBUF 


{CLEAR RECEIVER BUFFER 


MOV 


R3.aTVECT 


{RESTORE XMIT VECTOR 



{A************************************************************** 

♦TEST 37 TEST THAT RCVR INTERRUPTS ONLY WHEN ENABLED 

{**********************************************************«**** 

TST37: SCOPE 



1^ 



2$: 



3»: 



4$: 



MOV 
BIC 
BIC 
MOV 
MOV 
JSR 

CLR 
TSTB 
BPL 
BR 

CMP 
ERROR 



MOV 
BIS 
NOP 
ERROR 



BIC 
CMP 
MOV 



#37,$TESTN 

«6IT6.8TCSR 

46IT6.SRCSR 

aRVECT.R3 

♦2*.aRVECT 

PC.WRPSW 

.WORD 140 

STBUF 

aRCSR 

II 

3» 

(SP)*.(SP)* 
125 



»4«.aRVECT 
«BIT6. aRCSR 



126 



«BIT6.SRCSR 
(SP)».CSP)» 
RS.aRVECT 



{SET TEST NUMBER IN APT MAIL BOX 
DISABLE TRANSMIT INTERRUPTS 
DISABLE RECEIVER INTERRUPTS 
SAVE RECEIVE VECTOR 
POINT RCV VECTOR TO ERROR REPORT 
SET PSW TO PRIORITY 3 

{SEND A CHARACTER 
{WAIT FOR RECEIVER DONE 

{CONTINUE TEST 

{RESTORE SP AFTER INTERRUPT 

{RECEIVER INTERRPUTS WITH INT. ENABLE aEAR 

{POINT RCV VECTOR TO END OF TEST 
{ENABLE RCV INTERRUPTS 
{GIVE ANY INTERRUPTS TIME 

{RCVR DID NOT INTERRUPT 

{DISABLE INTERRUPTS 
{RESTORE SP AFTER INTERRUPT 
{RESTORE RECEIVE VECTOR 



♦TEST 40 TEST THAT RCVR INTERRUPTS DO NOT OCCUR WHEN DISABLED 

{************♦***********♦**♦**********♦******♦**♦♦♦♦♦♦♦*♦♦***** 

TST40: SCOPE 

MOV MO.ITESTN {{SET TEST NUMBER IN APT MAIL BOX 

JSR PC.WRPSW {SET PSW TO PRIORITY 7 

.WORD 340 

MOV aRVECT.R3 {SAVE RECEIVE VECTOR 

MOV #2».aRVECT {POINT RCVR VECTOR TO ERROR REPORT 



J4 



CJKDIBO 


11/238 
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09:57 






0050// 


173024 


2363 


007732 


1 AC777 
105 / / / 


173012 


2564 


007/36 


1003 /5 




2365 


00/ /•♦O 


rtQ0777 
052 / / / 


000100 


2566 


00 //W 


000240 




256 ' 


OO / /5v 


OOOnOc 




2560 


OO / / JC 


OccDcD 






OO ( / 


lOdl 37 
xO^xc / 












25 ' 1 










OO / / jO 


Od3777 
Uhc / / / 


000100 


I 0 




019777 


010004 


3^74 


<V47773 
SAI life 


0047^^7 

1 O 1 


012356 


3^7^ 

CJ 'J 


\rj 1 1 lo 


OOOI AO 












3^77 




000409 




9^7fl 

C3 ' O 




















1041'^0 














010010 


OlO'S?? 


172756 












































010014 


000004 






01001f« 


0197'^? 

VXC f ^ f 


000041 




010094 


017703 

VX ' ' 


172742 


9SQ1 


0100 V) 


017704 

VX 1 1 v^* 


172740 


9SQ9 


0100^ 


019777 

VXC Iff 


010102 




01OO49 


019777 

VXC f f ' 


000340 






WH f O f 


012356 


9SQS 


0100S4 


000140 
wvx**v 






OlOOSn 


00S077 


172674 


PSQ7 




1 0S777 
Xv J f f f 


172662 






1 00'^7S 
XVUO f ^ 






010070 


0S9777 
yjjc III 


000100 




01007*i 

VX W 1 D 






covx 








P*i09 
cDvc 


01 01 OO 


1 OAI T1 
XV^XOX 






















01 01 09 


OccDcD 






oi ni od 

OXOXOh 


ni P777 
OlC Iff 


010136 


3<irt7 
cDU r 


OXOXXC 


OO^ 1 3 1 


012356 


2608 


010116 


000140 




2609 


010120 


000240 




2610 


010122 


042777 


000100 


2611 


010130 


010477 


172640 


2612 


010134 


000402 




2613 








2614 


010136 


022626 




2615 


010140 


104132 




2616 








c517 


010142 


010377 


172624 
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GET VALUE FOR SOFTWARE SWITCH REGISTER 



SeO 0048 



173002 



172764 
173000 



1$: 



2$: 



3$: 



4$: 



5$; 



CLR 

TSTB 

BPL 

BIS 

NOP 

BR 

CMP 

ERROR 



BIC 
MOV 
JSR 

NOP 
BR 

CMP 
ERROR 

MOV 



aTBUF 
SRCSR 
1$ 

#BIT6,aRCSR 
3$ 

(SP)*.(SP)* 
127 



#BIT6, SRCSR 
#4$.aRVECT 
PC.WRPSW 
.WORD 140 

5* 

(SP)*.(SP)* 
130 

R3.aRVECT 



iSEND A CHARACTER 

J WAIT FOR RECEIVER DONE 

! ENABLE INTERRUPTS 

J GIVE TIME FOR INTERRUPT 

; CONTINUE TEST 

; RESTORE SP AFTER INTERRUPT 

jRCVR INTERRUPTS AT PRIORITY 7 

} CLEAR INTERRUPT ENABLE 

; POINT RCVR VECTOR TO ERROR REPORT 

J SET PSW TO PRIORITY 3 

:GIVE TIME FOR ANY INTERRUPT 

sBR TO END OF TEST. IF NO INTERRUPT 

s RESTORE SP AFTER INTERRUPT 

;RCVR INTERRUPT REQUEST PASSED WITH BIT6 CLEAR 
; RESTORE RECEIVE VECTOR 



001104 



172730 
172724 



172652 



• **************************************************************** 

;*TEST 41 TEST SLU2 RECEIVER FOR DOUBLE INTERRUPTS 

• **************************************************************** 

TST41: SCOPE 

;»SET TEST NUr«ER IN APT MAIL BOX 
sSAVE RECEIVE VECTOR 
;SAVE RECEIVE PSW VECTOR 
{POINT RCV VECTOR TO CONTINUE TEST 
{SET PRIORITY TO 7 AFTER INTERRUPT 
tSET PSU TO PRIORITY 3 



MOV 
MOV 
MOV 
MOV 
MOV 
JSR 



1$: 



CLR 

TSTB 

BPL 

BIS 

NOP 



#41.»TESTN 
aRVECT.R3 
SRPSU.R4 
«2*.aRVECT 
«340,aRPSW 
PC.URPSU 
.UORO 140 
STBUF 
SRCSR 
1$ 

«eiT6, SRCSR 



ERROR 131 



172660 



172620 



2$: 



3*: 
41: 



CMP 

MOV 

JSR 

.WORD 

NOP 

BIC 

MOV 

BR 

CMP 
ERROR 

MOV 



CSP)*,CSP)* 
#3l.aRVECT 
PC.WRPSW 
140 

«eiT6.SRCSR 

R4,SRPSW 

4$ 

(SP)*.CSP)* 
132 

R3.SRVECT 



.SEND A CHARACTER 
:WAIT FOR RCVR DONE 

; ENABLE RCV INTERRUPTS 
;GIVE SOME TIME 



sRCVR INTERRUPT DID NOT OCCUR 

{RESTORE SP AFTER INTERRUPT 

s POINT RCV VECTOR TO ERROR REPORT 

s RESET PSW TO PRIORITY 3 

jGIVE SOME TIME 

.•CLEAR INTERRUPT ENABLE 

i RESTORE RECEIVE PSW VECTOR 

s BR TO END OF TEST 

{RESTORE SP AFTER INTERRUPT 

{RECEIVER RE -INTERRUPTED 
{RESTORE RECEIVE VECTOR 



I<4 





WWW* 




OlOlSO 


012737 


000042 


010156 


004737 


012356 








010164 


017703 


172602 


010170 


012777 


010242 


010176 


052777 


000100 


010204 


005077 


172546 


010210 


105777 


172534 


010214 


100375 




010216 


005777 


172530 


010222 


004737 


012356 


010226 


000140 




010230 


000240 




010232 


042777 


000100 


010240 


000402 




010242 


022626 




010244 


104133 




010246 


010377 


172520 
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2618 

2619 

2620 

2621 

2622 

2623 

2624 

2625 

2626 

2627 

2628 

2629 

2630 

2631 

2632 

2633 

2634 

2635 

2636 

2637 

2638 

2639 

2640 

2641 

2642 

2643 

2644 

2645 

2646 

2647 

2648 

2649 

2650 

2651 

2652 

2653 

2654 

2655 

2656 

2657 

2658 

2659 

2660 

2661 

2662 

2663 

2664 

2665 

2666 

2667 

2668 

2669 

2670 

2671 

2672 

2673 



MACYll 30(1046) 24-MAR-86 10:44 PAGE 50 
GET VALUE FOR SOFTWARE SUITCH REGISTER 



i*TEST 42 TEST THAT RCVR INTERRUPT CLEARS BY READING RBUF 



SEQ 0049 



TST42: 



2$: 



3*: 



SCOPE 




MOV 


#42.*TESTN 


JSR 


PC.URPSU 




.UORO 340 


MOV 


aRVECT.R3 


MOV 


<^2t ,8RVECT 


BIS 


«BIT6.SRCSR 


CLR 


aTBUF 


TSTB 


aRCSR 


BPL 


1$ 


TST 


8RBUF 


JSR 


PC.URPSU 




.UORO 140 


NOP 




BIC 


«BIT6. aRCSR 


BR 


3> 


CMP 


(SP)».(SP)* 


ERROR 


133 


MOV 


R3.aRVECT 



;;SET TEST NUMBER IN APT MAIL BOX 
sSET PSU PRIORITY TO 7 

:SAVE RECEIVE VECTOR 

{POINT RCV VECTOR TO ERROR REPORT 

iSET RCVR INTERRUPT ENABLE 

iSEND A CHARACTER 

sUAIT FOR DONE (INTERRUPT) 

:READ RBUF TO CLEAR PENDING INTERRPUT 
5 SET PSU TO PRIORITY 3 

;ALL0U TIME FOR ANY ERRONEOUS INTERRUPT 
:N0 INTERRUPT -aEAR INT. ENABLE 



{RESTORE SP AFTER INTERRUPT 

{READING RBUF DID NOT CLEAR INTERRUPT 

{RESTORE RECEIVE VECTOR 



010252 


000004 






TST43: 


SCOPE 


010254 


012737 


000043 


001104 




MOV 


010262 


032737 


000001 


001120 




BIT 


010270 


001403 








BEQ 


010272 


005737 


001106 






TST 


010276 


001037 








BNE 


010300 








70$: 




010300 


000005 








RESET 


01C302 


004737 


012356 






JSR 


010306 


000340 










010310 


017703 


172456 






MOV 


010314 


012777 


010366 


172450 




MOV 


010322 


052777 


000100 


172420 




BIS 


010330 


012777 


000377 


172420 




MOV 


010336 


105777 


172406 






TSTB 


010342 


100375 








BPL 


010344 


000005 








RESET 


010346 


004737 


012356 






JSR 


010352 


000140 










010354 


000240 








NOP 


010356 


042777 


000100 


172364 




BIC 


010364 


000402 








BR 



{♦TEST 43 TEST SLU2 THAT RESET aEARS RECEIVE INTERRUPT 



«43.*TESTN 
«1, 9»IENV 
701 

a»«PASS 
TST44 



PC.URPSU 

.UORO 340 

aRVECT.R3 

#2*,aRVECT 

«6IT6.SRCSR 

#377,8TBUF 

aRCSR 

II 

PC.URPSU 
.UORD 140 

«BIT6. aRCSR 
31 



:tSET TEST NUMBER IN APT HAIL BOX 

{ARE UE RUIMING UNDER APT 

(IF NO THEN DO TEST 

{IS THIS FIRST PASS 

{IF NO THEN SKIP TO NEXT TEST 

{CLEAR EVERYTHING 
{SET PSU TO PRIORITY 7 

{SAVE RECEIVE VECTOR 
{POINT RCV VECTOR TO ERROR REPORT 
;SET RCV INTERRUPT ENABLE 
{SEND AN ALL I'S CHARACTER 
{UAIT FOP RCV DONE 

{CLEAR RCV INTERRUPT L RBUF 
{SET PSU TO PRIORITY 3 

{ALLOU TIME FOR AN ERRONEOUS INTERRUPT 
{NO INTERRUPT-CLEAR INT. ENABLE 
{CONTINUE TEST 



L4 
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2674 


010366 


022626 




2675 


010370 


104134 




2676 








2677 


010372 


010377 


172374 


2678 








2679 








2680 








2681 








2682 








2683 


010376 


AA A AAd 

000004 




2684 


010400 


A4 '^^V^ 

012737 


AAA Ad d 

000044 


2685 


010406 


032777 


AAAAAA 

002000 


2686 


/\4 /\A 4 A 

010414 


AA4 A^9 

001023 




2687 


/\4 4 ^ 

010416 


A4 A^AA 

012700 


AAAAAT 

000003 


2688 


/\4 Ad 

010422 


aacatt 

005077 


172330 


2689 


010426 


4 AC T T T 

105777 


4 T 09 AA 

172322 


2690 


A4 Ail 

010432 


100375 




2691 


/\4 AJI Vii 

010434 


005300 




2692 


A4 Ad V£ 

010436 


001371 




2693 


A4 Ail M A 

010440 


AT*n^^ 
032777 


Ad AAAA 

040000 




A« il£ 

010446 


001001 




2695 


010450 


4 f\A 4 TC 

104135 




2696 








2697 








2690 


A4 AJIC^ 

010452 


03277 / 


100000 


2699 


A4 Ail £. A 

010460 


AA4 AA4 

001001 




2700 


A4 Ad f ^ 

010462 


4 Ad 4 V£ 

104136 




2701 








2702 


010464 






2703 








2704 








2705 








2706 








^^^^ 

2707 








2708 


A4 AJ|£ a 

010464 


000004 




^^^^ 

2709 


A4 Ad £. £ 

010466 


A4 ^^TT 

012737 


000045 


2710 


A1 Ail^ii 

010474 


A* 

012777 


If f f i f 


2711 


A« ACA') 

010502 


105777 


172242 


^^4 ^ 

2712 


010506 


100375 




2713 


A 1 AC 1 A 
010510 


005777 


1 12230 


2714 


A 4 AC 4 d 

010514 


AC ATTT 

052777 


AAAAA4 

000001 


2715 


A 4 AC^^ 

010522 


AACAAA 

005000 




2716 


A 4 AC^d 

010524 


105777 


4 *7AAAA 

172220 


^T4 T 

2717 


A 4 ACVA 

010530 


4 AAd Af 

100406 




2718 


A 4 AC90 

010532 


AAC AAA 

005200 




2719 


A 4 Af 9d 

010534 


AA4 

001373 




2f20 








2721 


010536 


042777 


000001 


2722 


010544 


104137 




2723 








2724 


010546 


105777 


172200 


2725 


010552 


001404 




2726 


010554 


042777 


000001 


2727 








2728 


010562 


104137 




2729 









001104 
170424 



MACYll 30(1046) 24 MAR 86 10:44 PAGE 51 
GET VALUE FOR SOFTWARE SWITCH REGISTER 

2$: CMP (SP)*,(SP)* {RESTORE SP AFTFR INTERRUPT 

ERROR 13^ 5 RESET DID NOT CLEAR RCVR INTERRUPT 

3*: MOV R3.SRVECT ; RESTORE RECEIVE VECTOR 



■ *************************************************************** 

♦TEST 44 TEST SLU2 THAT "OVERRUN £ ERROR" BITS CAN BE SET 

;*************************************************************** 

TST44: SCOPE 



SEQ 0050 



1*; 

2i. 



172304 



172272 31 ; 



41: 



MOV #44,$TESTN 

BIT «BIT10.3SWR 

BNE TST45 

MOV *3.R0 

CLR 8TBUF 

TSTB aTCSR 

BPL 2« 

DEC RO 

BNE U 

BIT #BIT14.aRBUF 

BNE 31 

ERROR 135 



BIT «6IT15.aRBUF 
BNE 41 
ERROR 136 



J J SET TEST NUMBER IN APT MAIL BOX 
:IS THIS TEST DISABLED 
ilF NOT ENABLED, BR TO NEXT TEST 
iSET CHARACTER COUNT TO SEND 3 CHAR. 
;LOAD TRANSMIT BUFFER 
:WAIT FOR TRANSMIT DONE 

; DECREMENT CHARACTER COUNT 

;BR IF ALL CHARACTERS NOT TRANSMITTED 

jTEST FOR "OR" ERROR FLAG 

:BR. IF SET 

{"OR" ERROR FLAG DID NOT SET 

{TEST "ERROR" FLAG 
;BR. IF SET 

TERROR" FLAG DID NOT SET WITH "OR" FLAG 



001104 
172254 



172232 



.**m************************************************************ 

*TEST 45 TEST THAT BREAK TRANSMITS ALL ZEROES 

;**************^************************************************ 

TST45: SCOPE 



II: 



21: 



172210 



172172 



C0NT41: 



MOV 
MOV 
TSTB 
BPL 
TST 
BIS 
CLR 
TSTB 
BMI 
INC 
BNE 

BIC 
ERROR 

TSTB 

BEQ 

BIC 



#45.»TESTN 
♦-l.STBUF 
aRCSR 
II 

SR8UF 

«eiT0.8TCSR 
RO 

aRCSR 
C0NT41 
RO 
21 

*eiTo, aTCSR 

137 

aRBUF 
31 

46IT0.8TCSR 



ERROR 137 



{{SET TEST NUMBER IN APT MAIL BOX 
.■TRANSMIT ALL ONES TO RCVR 
;UAIT FOR RCVR DONE 

jaEAR DONE (LEAVING ALL ONES IN RBUF) 
{TRANSMIT BREAK 
iCLEt-^ A TIMER 
jUAIT FOR RCVR DONE 
;BR IF DONE 

{IF NOT. INCREMENT TIMER 
:BR IF TIME REMAINS 

{CLEAP BREAK BITS 
{BREAK DID NOT TRANSMIT ANYTHING 

{CHECK RECEIVE BUFFER FOR ZERO 
{BR. IF ZERO 

{CLEAR BREAK BITS 

{BREAK DID NOT TRANSMIT ALL ZEROES 



m 
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GET VALUE FOR SOFTWARE SWITCH REGISTER 



AQ 0051 



2730 
2731 
2732 
2733 
2734 
2735 



2756 

2757 

2758 
2759 
2760 
2761 
2762 
2763 
2764 
2765 
2766 
2767 
2768 
2769 
2770 
2771 
2772 
2773 
2774 
2775 
2776 
2777 
2778 
2779 
2780 
2781 
2782 
2783 
2784 
2785 



010564 042777 000001 172162 3$: 



BIC 



«6IT0.8TCSR 



: CLEAR BREAK BITS 



C r OO 










tQT46- 












000046 


001 104 




NOV 


046 iTESTN 


C 1 




V J£ III 




1 70P50 




BIT 






OlOfilO 


001 OPS 








BNE 


TST47 


2740 


010612 


052777 


000001 


172134 




BIS 


MITO.STCSR 


2741 


010620 


005077 


172132 






CLR 


aTBUF 


2742 


010624 


105777 


172120 




1(: 


TSTB 


aRCSR 


2743 


010630 


100375 








BPL 


14 


2744 


010632 


042777 


000001 


172114 




BIC 


oeiTo.aTCSR 

«8IT13.9RBUF 


2745 


010640 


032777 


020000 


172104 




BIT 


2746 


010646 


001001 








BNE 


2$ 


2747 
















2748 


010650 


104140 








ERROR 


140 


2749 
















2750 


010652 


032777 


100000 


172072 


2$: 


BIT 


«6IT1S.8RBUF 


2751 


010660 


001001 








BNE 


3i 


2752 
















2753 


010662 


104141 








ERROR 


141 


2754 
















2755 


010664 








3*: 







010664 
010666 
010674 
010702 
010704 



010706 
010710 
010714 
010716 
010722 
010724 
010726 



000004 
012737 
032777 
001027 
OOSOOl 



105201 
010177 
005000 
105777 
100403 
005200 
001373 



000047 
000200 



001104 
170136 



172042 
172026 



i *************************************************************** 
*TEST 46 TEST THAT "FR" ERROR CAN BE SET DURING BREAK 

I*************************************************************** 

sSET TEST NUMBER IN APT MAIL BOX 
IS THIS TEST DISABLED 
BR TO NEXT TEST. IF DISABLED 
SEND BREAK 

TRANSMIT A CHAOJ,CTER TO TIME BREAK 
WAIT FOR RCVR UONE 

{CLEAR BRf AK BITS 
s CHECK FOR FRAMING ERROR FLAG 
tBR. IF SET 

i BREAK DID NOT SET FRAMING ERROR 
:TEST "ERROR "FLAG 
;BR, IF SET 

I -ERROR" FLAG DID NOT SET UITH "OR" FLAG 

; f *************************************************************** 

:*TEST 47 TEST DATA PATHS USING WRAP CABLE 

• **************************************************************** 

TST47: SCOPE 

MOV •47.»TESTN siSET TEST NUTBER IN APT MAIL BOX 

BIT «BIT7.8SUR ilS THIS TEST ENABLED 

BNE TST50 jBR. IF NOT 

CLR Rl '.oAkH REGISTER FOR TEST DATA 

.-TRANSMIT A BINARY COUNT PATTERN - UP 
;T0 THE BIT POSITION INDICATED BY THE 
; CONTENTS OF LOCATION "♦USUR" 
1$: INCB Rl {INCREMENT THE TEST DATA 

MOV Rl. aTBUF jXMIT A CHARACTER 

CLR RO ; CLEAR A TIMER 

2»: TSTB aRCSR jUAIT FOR RECEIVER DO»C 

BMI 3) :BR IF DONE 

INC RO INCREMENT TIMER IF NOT 

BIC 21 :BR IF TIME REMAINS 



010730 104056 



ERROR 56 



010732 
010736 
010740 
010742 
010744 
010746 
010750 
010754 



017702 
020102 
001003 
105701 
001406 
000757 
010137 
010237 



172014 



001024 
00102b 



3$: 



41; 



MOV 

CMP 

BNE 

TSTB 

BEQ 

BR 

MOV 

MOV 



aR8UF,R2 

R1.R2 

4$ 

Rl 

TST50 
II 

RI.IGDOAT 
R2.»BDDAT 



i RECEIVER DONE NOT SET 

;GET RECEIVED CHARACTER 
;COff>ARE DATA 
;BR. IF NON-COr*>ARE 
sTEST XMIT DATA FOR ZERO 
;BR. IF FINISHED 
{CONTINUE IF NOT 
{STORE EXPECTED DATA 
{STORE RECEIVED DATA 



N4 
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GET VALUE FOR SOFTWARE SUITCH REGISTER 



SCO 0052 



2786 


010760 


104142 






2787 










2788 










2789 


010762 








2790 










2791 










2792 










2793 










2794 


010762 


000004 






2795 


010764 


012737 


AAAAP A 

000050 


001104 


27% 


010772 


032737 


AAAAA4 

000004 


AA* 4 

001156 


2797 


011000 


AA4 AA^ 

001002 






2796 


011002 


AAA* 

000137 


A4 4 M^M 

011474 




2799 


011006 








2800 


011006 


AAP AAA 

005000 






coQl 


At 1 A1 A 

011010 


AAil TTT 

004737 


A1 ^7C£ 

012356 




2802 


011014 


AAATil A 

000340 








011016 


A1 T^AI 

017703 


1 T 1 TTA 

171770 




2804 


011022 


A 4 ^^AA 

017704 


4 T 4 £. 

171766 




2505 


A4 4 

011026 


A4 ^TTT 

012777 


A1 4 A^ A 

011060 


171756 


2o06 


A4 4 ATil 

011034 


A4 ^^^^ 

012777 


AAATil A 

000340 


171752 












2806 


A 4 4 Ail 

011042 


052777 


AAA4 AA 

000100 


1^1 ?^A 

171720 


2509 


A4 4 AC/\ 

011050 


AAC^AA 

005200 






2510 


A4 4 AC'^ 

011052 


AA4 TT^ 

001376 






2511 


All AC/1 


AAA^il A 

000240 






2512 


A4 1 AP£ 


000402 






2513 










^pi A 
2514 


A1 4 A£A 

OIIOdO 


022626 






^P 4 C 

2B15 


At 4 A^^ 

011062 


4 A4 4 ilT 

104143 






^P1 £ 

2516 










■^p 1 ^ 
2517 


A1 1 A£4 

011064 


AACATT 

005077 


4^4 7AA 

171700 




^p 4 a 

2818 


A4 1 A^A 

011070 


AACAAA 

005000 






^P 4 O 

2819 


A4 1 A^^ 

011072 


A4 ^^^^ 

012777 


A4 4 4 4 A 

011110 


171712 


2820 


A4 4 4 AA 

011100 


AAil 

004737 


A4 ^TC£. 

012356 




«>0^4 

2821 


A4 4 4 

011104 


AAA^ii A 

000240 






2522 


A4 4 4 A^ 

011106 


4 Ail 4 il £ 

104146 






2823 


A 4 4 4 4 A 

011110 


A4 ^^TT 

C12777 


A4 4 4 Vil 

011134 


171674 


2524 


A4 4 4 4 £ 

011116 


4 A£ il 

106427 


AAA^il A 

000240 




2825 


A4 4 4 

011122 


AACAAA 

005200 






2826 


A4 4 4 

011124 


AACAAA 

005700 






2827 


A4 4 4 

011126 


100375 






2828 


A 4 4 4 9 A 

011130 


AAA A M A 

000240 






2629 


A4 4 4 9^ 

011132 


AAAil A^ 

000402 






2830 










2831 


011134 


022626 








OIII06 


1 Ail 1 Ail 

104144 






2833 










2834 


011140 


012777 


0111,0 


171644 


2835 


011146 


005000 






2836 


011150 


052777 


000100 


171612 


2837 


011156 


005200 






2838 


011160 


005700 






2839 


011162 


100375 






2840 


011164 


000240 






2841 











ERkOR 142 



;DATA COMPARE ERROR UITH URAP CABLE 



LTCIT: 



♦TEST 50 TEST THAT THE REAL TIME CLOCK INTERRUPTS PROPERLY 

TST50: SCOPE 

" {SET TEST NUMBER IN APT MAIL BOX 



99$: 



2«: 
31: 



XXX: 
20$: 



4$: 

5$: 
6$: 



MOV 
BIT 
BNE 
JMP 

CLR 
JSR 

MOV 
MOV 
MOV 
MOV 

BIS 
INC 
BNE 
NOP 
BR 

CMP 
ERROR 

CLR 
CLR 
MOV 
JSR 

ERROR 

MOV 

MIPS 

INC 

TST 

BPL 

NOP 

BR 

CMP 
ERROR 

MOV 
CLR 
BIS 
INC 
TST 
BPL 
NOP 



«50.$TESTN 
«6IT2.9«$DEVM 
99$ 
BLAST 

RO 

PC.URPSU 

.UORO 340 

aRTCVT.R3 

9RTCPSU.R4 

«2$,aRTCVT 

*340.«TCPSU 

«6IT6.aLKS 

RO 

II 

3$ 

CSP)*.CSP)» 
143 



DO THESE TESTS FOR THIS DEVICE? 
F YES CONTINUE WITH TESTS 
IF NO GO TO START OF NEXT SET OF TESTS. 



:SET PSU TO PRIORITY 7 

J SAVE LINE CLOCK VECTOR 

sSAVE LINE CLOCK PSU VECTOR 

sSET RTC INTERRUPT VECTOR TO ERROR REPORT 

:KEEP PRIORITY AT 7 



;SET INTERRUPT ENABLE 



;GIVE TIME FOR ANY INTERRUPTS 
iBR. IF NO INTERRUPT OCCURS 

5 RESTORE SP AFTER INTERRUPT 
:RTC INTERRUPTS AT PRIORITY 7 



SLKS 
RO 

♦XXX.aRTCVT 
PC.URPSU 
.WORD 240 
146 

«4$.aRTCVT 

«240 

RO 

RO 

20$ 

5$ 

CSF)*.CSP)* 
144 

#7$.aRTCVT 
RO 

«6IT6.aLKS 

RO 

RO 

6$ 



.•DISABLE RTC INTERRUPTS 



»SET RTC INTFRRUPT VECTOR FOR ERROR 
; CHANGE PSU TO PRIORITY 5 



;GIVE TIME FOR ANY INTERRUPT 

J IF NO INTERRUPT - BR TO CONTINUE TEST 

; RESTORE SP AFTER INTERRUPT 

;RTC INTERRUPTS UITH INTERRUPTS DISABLED 

; POINT RTC VECTOR TO END OF TEST 

sALLOU INTERRUPTS 



;GIVE TIME FOR INTERRUPT 



B5 



CJKOIBO 11/238 SLU LTC REPR DIAG 
JKDIBO.Pll 24-MAR-86 C9:57 



MACYll 50(1046) 24 MAR 86 10:44 PAGE 54 
GET VALUE FOR SOFTUARE SUITCH REGISTER 



SEQ 0053 



2842 
2843 
2844 
2845 
2846 
2847 
2848 
2849 
' 2850 
2851 
2852 
2853 
2854 
2855 
2856 
2857 
?858 
J859 
2860 
2861 
f862 
2863 
2864 
2865 
2866 
£867 
2368 
2869 
2870 
2871 
2872 
2873 
2874 
2875 
2876 
2877 
2878 
2879 
2880 
2881 
2882 
2883 
2884 
2885 
2886 
2887 
2888 
2889 
2890 
2891 
2892 
2893 
2894 
2895 
2896 
2897 



011166 104145 



011170 
011172 
011200 
011204 



022626 
042777 
010377 
010477 



011210 
011212 
011220 
011226 
011230 
011234 
011236 
011236 
011242 
011246 
011254 
011262 
011266 

011270 
011272 
011300 
011302 
011304 
011306 



000004 
012737 
032737 
001403 
005737 
001050 

017703 
017704 
012777 
012777 
004737 
000240 

005000 
052777 
005200 
005700 
100375 
000240 



011310 104146 



011312 
011314 
011322 
011326 
011330 
011332 

011334 
011336 



011340 
011346 
011352 



011356 
011360 



022626 
012777 
004737 
000240 
000240 
000402 

022626 
104147 



042777 
010377 
010477 



000004 
012737 



ERROR 145 



000100 
171606 
171604 



171570 



7$: 



CMP 
BIC 
MOV 
MOV 



(SP)*.(SP)* 
#eiT6.aLKS 
R3,aRTCVT 
R4,aRTCPSU 



jRTC INTERRUPT DID NOT OCCUR 

RESTORE SP AFTER INTERRUPT 
DISABLE INTERRUPTS 
RESTORE LINE CLOCK VECTOR 
RESTORE LINE CLOCK PSU VECTOR 



000051 
000001 

001106 



171550 
171546 
011312 
000340 
012356 



001104 
001120 



*TEST 51 TEST RTC FOR DOUBLE INTERRUPTS 
TST51 • SCOPE 

MOV #51,*TESTN siSET TEST NUMBER IN APT MAIL BOX 

BIT n. 9«IENV (ARE UE RUNNING UNDER APT 

BEQ 70* :IF NO THEN 00 TEST 

TST a#$PASS {IS THIS FIRST PASS 

BNE TST52 jIF NO THEN SKIP TO NEXT TEST 



70$! 



171536 
171532 



MOV 8RTCVT.R3 
MOV aRTCPSU,R4 
MOV *2$.aRTCVT 
MOV #340,8RTCPSU 
JSR PC.URPSW 

.UORD 240 



;SAVE LINE CLOCK VECTOR 

;SAVE LINE aOCK PSU VECTOR 

jSET UP RTC INTERRUPT VECTOR 

; DISALLOW INTERRUPTS AFTER THE INTERRUPT 

J SET PRIORITY TO 5 



000100 171470 



011334 
012356 



171470 



000100 
171440 
171436 



171422 





CLR 


RO 






BIS 


«8IT6,aLKS 


: ENABLE CLOCK INTERRUPTS 


11: 


INC 


RO 




TST 


RO 






BPL 


1$ 






NOP 




sGIVE TIME FOR ANY INTERRUPT 




ERROR 


146 


;RTC INTERRUPT DID NOT OCCUR 


21: 


CMP 


(SP)*.(SP)* 


: RESTORE SP AFTER INTERRUPT 




MOV 


#3#,8RTCVT 


! POINT RTC VECTOR TO ERROR REPORT 




JSR 


PC.URPSW 


sSET PSU TO PRIORITY 5 






.WORD 240 






NOP 




.GIVE SOME TIME rOR AN INTERRUPT 




BR 


4$ 


;N0 INTERRUPT - BR TO END OF TEST 


31: 


CMP 


(SP)*.(SP)* 


s RESTORE SP AFTER INTERRUPT 




ERROR 


147 


} INTERRUPT SEQUENCE DID NOT aEAR 








! INTERRUPT REQUEST 


4$: 


BIC 


#eiT6.aLKS 


! DISABLE aOCK INTERRUPTS 




MOV 


R3,aRTCVT 


t RESTORE LINE CLOCK VECTOR 




MOV 


R4.8RTCPSW 


iRESTORE LINE CLOCK PSU VECTOR 



000052 001104 



;*TEST 52 TEST THAT RTC INTERRUPT CLEARS WITH RESET 

TST52* SCOPE 

MOV ♦52.ITESTN iiSET TEST NUMBER IN APT MAIL BOX 



C5 

SEQ 0054 
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JKDIBO.Pll 24-MAR-86 09:57 GET VALUE FOR SOFTUARE SUITCH REGISTER 



2898 


011366 


032737 


000001 


0^^^ A a ^^^^ 

001120 




BIT 


*1, 8#*ENV 


(ARE UE RUNNING UNDER APT 


2899 


011374 


001403 
005737 








BEQ 
■'ST 


70* 


J IF NO THEN 00 TEST 


2900 


011376 


001106 






S**PASS 


sis THIS FIRST PASS 


2901 


011402 


001034 








BNE 


TST53 


ilF NO THEN SKIP TO NEXT TEST 


2902 


011404 








70* : 








2903 


011404 


004737 


012356 






JSR 


PC , URPSW 
. WORD 340 


;SET PRIORITY TO 7 


2904 


011410 


000340 












2905 


011412 


017703 


171374 






MOV 


aRTCVT,R3 


.-SAVE LINE CLOCK VECTOR 


2906 


011416 


012777 


011464 


171366 




MOV 


*2» .SRTCVT 


; POINT RTC VECTOR TO ERROR REPORT 


2907 


















2908 


011424 


005000 








CLR 


DA 

HO 




2909 


011426 


052777 


000100 


171334 






WITo,9LKb 


CUADI c Pi /v*w tutcddi dtc 


2910 


M4 4 ^ 

011434 


005200 






If : 




OA 

RO 




2911 


A4 4 d 

011436 


005700 








rsT 


OA 

RO 




2912 


011440 


100375 








DDI 

BrL 


1* 




2913 


011442 


000005 








DCCCT 




.PI CAD DCMHTklP TkJTCDDI OT UTTU DCCCT 


2914 


A4 4 AAA 

011444 


004737 


012356 






ICO 

J5K 


DP 1 ADCt 1 


; at 1 rKXUKi. IT 1 U 5 


2915 


A4 4 AXit\ 

0114D0 


000240 










1 lADn A 




2916 


A4 4 A 

0114D2 


000240 








NUr 




.PTUC TTMC rno amy tmtpdoidt 
;uXvc lint rUK 8rlT INItKm^l 


291 / 


A1 1 ACA 

0114D4 


We. Ill 


000100 


171 TA£. 








.HTCat 1 nU TUTPOOIDTC 
1 UldHLLUH XN 1 CKKUr 1 3 


2918 


011462 


000402 








BR 


31 


: BR TO END OF TEST 






















m 1 AAA 








2$: 


CMP 


(SP)»,(SP)» 


J RESTORE SP AFTER INTERRUPT 


2921 


011466 


104150 








ERROR 


150 


s RESET DID NOT CLEAR INTERRUPT 


2922 


















2923 


011470 


010377 


171316 




3*: 


MOV 


R3.aRTCVT 


! RESTORE LINE aXK VECTOR 


2924 


















2925 


011474 








BLAST: 








2926 


















2927 










: **************************************************************** 


2928 










;*TEST 53 


TEST ALL INTERNAL OPTIONS SIMULTANEOUSLY 


2929 













2930 011474 000004 TST53: SCOPE 

2931 011476 012737 000053 001104 MOV 

2932 011504 032737 000001 001120 BIT 

2933 011512 001405 BEQ 

2934 011514 005737 001106 TST 

2935 011520 001402 BEQ 

2936 011522 000137 012240 JMP 

2937 011526 000005 70*: RESET 

2938 011530 012737 000340 177776 MOV 

2939 011536 017737 171234 001060 MOV 

2940 011544 017737 171222 001062 MOV 

2941 011552 017737 171230 001064 MOV 

2942 011560 017737 171216 001066 MOV 

2943 011566 017737 171220 001070 MOV 

2944 011574 005037 012232 CLR 

2945 011600 005037 012234 CLR 

2946 011604 005037 012236 CLR 
2947 

2948 011610 012777 011726 171160 MOV 

2949 011616 012777 000340 171154 MOV 

2950 011624 012777 011762 171140 MOV 

2951 011632 012777 000340 171134 MOV 

2952 011640 012777 011716 171144 MOV 

2953 011646 012777 000340 171140 MOV 



*53.$TESTN 

«Blt0,9«*ENV 

70* 

S«$PASS 

70* 

*EOP 

♦340,PS 

aTVECT.ITMPO 

aRVECT,*TMPl 

a:TVECt,<TMP2 

aCRVECT,*TMP3 

aRTCVT,|TMP4 

XMTCT2 

RECCT2 

COUNT 

#XMIT2, 8TVECT 
«340. 8TPSU 
«REC2. 8RVECT 
«340, SRPSU 
♦TICKER, 8RTCVT 
«340, SRTCPSU 



;!SET TEST NUTBER IN APT MAIL BOX 

iARE Ve RU(«iING UM)ER APT 

I IF NO 00 TEST 

;IS THIS FIRST PASS 

5 IF YES 00 TEST 

jIF NO 00 NOT DO TEST 

s CLEAR EVERY BODY 

{SET PROCESSOR PRIORITY TO 7 



J SET UP SLU2 TRANSMIT VECTOR 
t AND PSU 

I SET UP SlU2 receiver VECTOR 
{AND PSU 

sSET UP RTC VECTOR 
(AND PSU 



D5 
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MACYll 30(1046) 24-MAR-86 10:44 PAGE 56 
GET VALUE FOR SOFTWARE SWITCH REGISTER 



SEQ 0055 



2954 














#6IT6, 8TCSR 


2955 


011654 


052777 


000100 


171072 




BIS 


2956 


011662 


052777 


000100 


171060 




BIS 


#6IT6. 8RCSR 


2957 


011670 


012703 


026320 






MOV 


#6UF2. R3 


2958 
















2959 


011674 


052777 


000100 


171066 




BIS 


«6IT6, aLKS 


2960 


011702 


012701 
005037 


177777 




3$: 


MOV 


*-l. Rl 


2%1 


011706 


177776 






CLR 


PS 


2962 


011712 


000001 






WAITIO: 


WAIT 




2%3 


011714 


000776 








BR 


WAITIO 


2964 
















2965 


011716 


005237 


012236 




TICKER: 


INC 


COUNT 


2966 


011722 


000137 


012036 






JMP 


lOHANO 


2967 
















2968 
















2%9 


011726 


005237 


012232 




XMIT2 : 


INC 


XMTCT2 


2970 


011732 


005201 








INC 


Rl 


2971 


011734 


010177 


171016 






MOV 


Rl, 8TBUF 
XMTCT2 , #400 


2972 


011740 


023727 


012232 


000400 




CMP 


2973 


011746 


002403 








BLT 


1* 


2974 


011750 


042777 


000100 


170776 




BIC 


#BIT6, STCSR 


2975 


011756 


000137 


012036 




1$: 


JMP 


lOHAND 


2976 
















2977 


011762 


005237 


012234 




REC2: 


INC 


RECCT2 


2978 


011766 


005777 


170760 






TST 


aRBUF 


2979 


011772 


100017 








BPL 


3$ 


2980 


011774 


017737 


170752 


001026 




MOV 


aRBUF . $BOOAT 


2981 


012002 


000005 








RESET 




2982 
















2983 


012004 


020327 


026320 






CMP 


R3. «BUF2 


2984 


012010 


003004 








BGT 


1$ 


2985 


012012 


012737 


177777 


001024 




MOV 


•-1, IGDOAT 


2986 


012020 


000403 








BR 


2« 


2987 


012022 


116337 


177777 


001024 


U: 


MOVB 


-1(R3), IGODAT 


2988 


012030 


104154 






2*: 


ERROR 


154 


2989 


012032 


117723 


170714 




3$: 


MOVB 


aRBUF. (R3)* 


2990 
















2991 


012036 


023727 


012236 


000074 


lOHAND: 


CMP 


COUNT. #74 


2992 


012044 


002412 








BLT 


3$ 


2993 


012046 


042777 


000100 


170710 




BIC 


«IT6, SCTC^ 


2994 


012054 


042777 


000100 


170672 




BIC 


«IT6, STCSR 


2995 


012062 


042777 


000100 


170700 




BIC 


#6IT6, aLKS 
WAITER 


29% 


012070 


000401 








BR 


2997 


012072 


000002 






3$: 


RTI 




2998 
















2999 


012074 


005037 


177776 




WAITER: 


CLR 


PS 


3000 


012100 


012705 


140000 






MOV 


#-40000. R5 


3001 


012104 


062705 


000001 




If: 


ADO 


#1. R5 


3002 


012110 


001375 








BNE 


11 


3003 


012112 


000005 








RESET 




3004 


012114 


012706 


001000 






MOV 


#1000. SP 


3005 
















3006 
















3007 


012120 


023737 


012232 


012234 


CHECK2: 


CMP 


XMTCT2, RECCT2 


3008 


012126 


001401 








BEQ 


If 


3009 


012130 


104157 








ERROR 


157 



.•ENABLE SLU2 XMIT INTERRUPT 

i ENABLE SLU2 RECEIVER INTERRUPT 

;SET UP RECEIVER BUFFER 

{ENABLE RTC INTERRUPTS 
{INITIALIZE DATA FOR SLU2(1ST CHR. 0) 
5 DROP PROCESSOR PRIORITY TO ZERO 
{WAIT FOR INTERRUPT 



! UPDATE COUNT 

sGO TO INTERRUPT HANDLER 



UPDATE XMIT INTERRUPT COUNT 

UPDATE XMIT DATA 

SEND NEXT CHARACTER 

IF 256 CHARACTERS HAVE NOT 

BEEN TRANSFERRED CONTINUE 

ELSE NO MORE XMIT INTERRUPTS 

60 TO INTERRUPT HANDLER 

UPDATE RECEIVER INTERRUPT COUNT 
BIT 15 SETS IF ANY ERRORS XCURRED 
IF BIT IS aEAR NO ERRORS 
GET ERROR INFORMATION 
CLEAR THE WORLD - STOP ALL 
INTERRUPTS 

WAS MORE THAN 1 WORD TRANSFERRED 

IF YES GET LAST GOOD DATA 

IF NO HAKE GOOD DATA -1 

AfO GET TO ERROR REPORT 

GET LAST GOOD DATA RECEIVED 

RECEIVER STATUS ERROR 

GET DATA AND STORE IT 

HAS 1 SEC ELAPSED 

IF NO CONTINUE TEST 

IF YES STOP TRANSMISSIONS 

TURN OFF LINE aOCK 

;RETURN FROM INTERRUPT TO AWAIT NEXT 

{MAKE PROCESSOR PRIORITY 0 
I SET UP LOOP COUNTER 
;D0 LOOP UNTIL R5 - 0 

{STOP EVERYONE SHOULD BE DONE 
.•RESET STACK AFTER LAST INTERRIFT 



,#0F XMIT INTERRUPTS - REC INTERRIFTS 
I IF YES CHECK DATA 
INTERRUPT COMPARISON ERROR 



E5 
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3010 
3011 
3012 
3013 
3014 
3015 
3016 
3017 
3018 
3019 
3020 
3021 
3022 
3023 
3024 
3025 
3026 
3027 
3028 
3029 
3030 
3031 
3032 
3033 
3034 
3035 
3036 
3037 
303« 
303>J 
3040 



012132 
012136 
012140 
012144 
012146 
012150 
012154 
.■»12160 
012162 
012164 
012166 
012170 
012176 
012204 
012212 
012220 
012226 

012232 
012234 
012236 



012703 
005001 
013704 
122301 
001406 
114337 
010137 
104160 
005203 
005201 
077412 
013777 
013777 
013777 
013777 
013777 
000137 

000000 
000000 
000000 



026320 
012232 



001026 
001024 



001060 
001062 
001064 
001066 
001070 
012240 
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GET VALUE FOR SOFTUARE SUITCH REGISTER 



1$: 



SEQ 0056 



2i: 



3$; 



170600 
170566 
170574 
170562 
170564 



MOV 


«UF2, 


R3 


J INITIALIZE TO FIRST RECEIVED DATA 


CLR 


Rl 




; INITIALIZE TO FIRST XMIT DATA 


MOV 


XMTCT2. 


R4 


.•GET # OF BYTES TRANSFERRED 


CMPB 


(R3)*. 


Rl 


»IS RECEIVFD DATA - EXPECTED DATA 


BEQ 


3* 




.IF YES CONTINUE TESTING 


MOVB 


-(R3). 


$BODAT 


;IF NO GET ERROR INFORMATION 


MOV 


Rl. IGOOAT 


ERROR 


160 




iSLU2 DATA COMPARISON ERROR 


INC 


R3 




jIF COONTINUE ON ERROR RESET POINTER 


INC 


Rl 




i UPDATE TO NEXT G(XX) DATA 


SOB 


R4.2* 




J LOOP UNTIL ALL DATA CHECKED 


nuv 


HMPO. 


8TVECT 


; Kto 1 UKc. vtL 1 UKs 


MOV 


*TMP1, 


aRVECT 


MOV 


*TMP2. 


aCTVECT 




MOV 


$TMP3. 


acRVEcr 




MOV 


♦TMP4. 


SRTCVT 




JMP 


$Eap 




! FINISHED TESTING GO TO END OF PASS 


.WORD 


0 






.WORD 


0 






.WORD 


0 







XMTCT2: 
RECCT2: 
COUNT: 



.SBTTL END OF PASS ROUTINE 

;**********«******************•**•*************•**************** 

•INCREMENT THE PASS NUMBER (IPASS) 

*TYPE "END PASS MXXXX" (UHERE XXXXX IS A DECIMAL NUTfiER) 
*IF THERES A MONITOR GO TO IT 
♦IF THERE ISN'T JUMP TO TSTl 



3041 


012240 






*EOP: 






3042 


012240 


000004 






SCOPE 




3043 


012242 


005037 


001002 




CLR 


ITSTNM 


3044 


012246 


005237 


001106 




INC 


(PASS 


3045 


012252 


042737 


100000 001106 




BIC 


#100000. IPASS 


3046 


012260 


005327 






DEC 


(PC)* 


3047 


012262 


000001 




JEOPCT: 


.UORD 


1 


3048 


012264 


003022 






BGT 


$DOAGN 


3049 


012266 


012737 






MOV 


(PC)*.8(PC)* 


3050 


012270 


000001 




lENDCT: 


.WORD 


1 


3051 


012272 


012262 






♦EOPCT 




3052 


012274 


104401 


012341 




TYPE 


.«ENDMG 


3053 


012300 


013746 


001106 




MOV 


♦PASS.-(SP) 


3054 


012304 


104405 






TYPDS 


3055 


012306 


104401 


012336 




TYPE 


.(ENULL 


3056 


012312 


013700 


000042 


tGET42: 


MOV 


SM2.R0 


3057 


012316 


001405 






BEQ 


lOOAGN 


3058 


012320 


000005 






RESET 


3059 


012322 


004710 




(ENDAO: 


JSR 


PC.(RO) 


3060 


012324 


000240 




NOP 


3061 


012326 


000240 






NOP 




3062 


012330 


000240 






NOP 




3063 


012332 






$00AGN: 






3064 


012332 


000137 






JMP 


9(PC)* 


3065 


012334 


003430 




IRTNAO: 


.UORD 


TSTl 



! J ZERO THE TEST 
;jINCREMENT THE 
{(DON'T ALLOU A 
;:LOOP? 



NUMBER 

PASS NureER 

NEC. NUrCER 



ijYES 

siRESTQRE COUNTER 



I! TYPE "EfC PASS #• 

J! SAVE IPASS FOR TYPEOUT 

ijGO TYPE-DECIMAL ASCII WITH SIGN 

5 5 TYPE A NULL CHARACTER 

isGET MONITOR ADDRESS 

t (BRANCH IF NO MONITOR 

(CLEAR THE WORLD 

(GO TO MONITOR 

(SAVE ROOM 

(FOR 
({ACTll 



5 (RETURN 



^5 
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3066 012336 377 377 000 

3067 012341 015 042412 042116 

3068 012346 050040 051501 020123 

3069 012354 000043 
3070 

3071 
3072 

3073 012356 011646 

3074 012360 013616 

3075 012362 062746 000002 

3076 012366 000002 
3077 

3078 
3079 

3080 012370 012600 

3081 012372 162700 000004 

3082 012376 010037 012416 

3083 012402 016637 000002 012414 

3084 012410 104161 
3085 

3086 012412 000000 

3087 012414 000000 

3088 012416 000000 
3089 

3090 
3091 
3092 
3093 
3094 
3095 
3096 
3097 
3098 
3099 
3100 
3101 
3102 

3103 012420 

3104 012420 105237 001003 

3105 012424 001775 

3106 012426 013777 001002 166406 

3107 012434 005237 001012 

3108 012440 011637 001016 

3109 012444 162737 000002 001016 

3110 012452 117737 166340 001014 

3111 012460 032777 020000 166352 

3112 012466 001004 

3113 012470 004737 012602 

3114 012474 104401 001075 

3115 012500 

3116 012500 122737 000001 001120 

3117 012506 001007 

3118 012510 113737 001014 012522 

3119 012516 004737 013304 

3120 012522 000 

3121 012523 000 



SEQ 0057 

MACYll 30(1046) 24 -MAR -86 10:44 PAGE 58 
END OF PASS ROUTINE 

$ENULL: .BYTE l.-l.O »;NULL CHARACTER STRING 

$ENDMG: .ASCIZ <15><12>/EN0 PASS #/ 



URPSU: MOV(SP).-(SP) 

MOV a(SP)»,(SP) 
ADD #2,-(SP) 
RTI 



COPY RETUN PC 

MOVE NEU PSW TO STACK 

ADJUST JSR RETURN 

POP RETURN PC e NEU PSU 



5 SUBROUTINE TO REPORT UNEXPECTED OR ERRONEOUS TRAPS OR INTERRUPTS 



CATCH: MOV 
SUB 
MOV 
MOV 
ERROR 

HALT 
OLDPC: .WORD 
BDVECT: .UORD 



(SP)»,RO 
«4.R0 
RO, BDVECT 
2(SP), OLDPC 
161 



0 
0 



GET ADDRESS OF TRAP VECTOR ♦ 4 
ADJUST TO POINT TO TRAP ADDRESS 
STORE TRAP OR INTERRUPT ADDRESS 
GET PC WHERE TRAP OR INTERRUPT OCCURRED 
REPORT ERROR 

: PROGRAM MUST BE RESTARTED AT THIS POINT 



;***«*********************************************************** 

♦THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND TJC ERROR COUNT, 
♦SAVE THE ERROR ITEM NUMBER AND ADDRESS OF THE ERROR CALL 
♦AND GO TO $ERRTYP ON ERROR 

♦THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

♦SW15-1 HALT ON ERROR 

♦SW13-1 INHIBIT ERROR TYPEOUTS 

♦SW09-1 LOOP IN ERROR 

♦CALL 

♦ ERROR N i;ERR0R-EMT AND N-ERROR ITEM NUMBER 



TERROR: 
7$: 



20«: 



21»: 



INCB lERFLG 

BEQ 7i 

MOV »TSTNM.aOISPLAY 

INC tERTTL 

MOV (SP),*ERRPC 

SUB #2.*ERRPC 

MOVB 8*ERRPC.$ITEMB 

BIT #6IT13,aSWR 

BNE 201 

JSR PC.IERRTYP 

TYPE . ♦CRLF 

CMPB OAPTENV.$ENV 

BNE 21 

MOVB 4ITEMB.21$ 

JSR PC . ♦ATY4 

.BYTE 0 

.BYTE 0 



;SET T« ERROR FLAG 

; DON'T LET FLAG GO TO ZERO 

; DISPLAY TEST NUMBER AND ERROR FLAG 

{INCREMENT ERROR COUNT 

{GET ADDRESS OF ERROR INSTRUCTION 

STRIP AND SAVE THE ERROR ITEM CODE 
SKIP TYPEOUT IF SET 
SKIP TYPEOUTS 
;G0 TO USER ERROR ROUTINE 



RUNNING IN APT MODE 

NO. SKIP APT ERROR REPORT 

SET ITEM NUMBER AS ERROR NUMBER 

REPORT FATAL ERROR TO APT 



G5 
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MACYll 30(1046) 24 MAR 86 10:44 PAGE 59 
END OF PASS ROUTINE 



SEQ 0058 



3122 


012524 


000777 






22$: 


BR 


22i 


3123 


012526 


005777 


166306 




2$: 


TST 


9SUR 


3124 


012532 


100001 








BPL 


3$ 


3125 


012534 


000000 








HALT 




3126 


012536 


104407 






3$: 


CKSUR 




3127 


012540 


032777 


001000 


166272 




BIT 


*6I'09,aSWR 


3128 


012546 


001402 








BEQ 




3129 


012550 


013716 


001010 






MOV 


<LPERR,(SP) 


3130 


012554 


005737 


001072 




4$: 


TST 


♦ESCAPE 


3131 


012560 


001402 








BEQ 


5* 


3132 


012562 


013716 


001072 






MOV 


$ESCAPE.(SP) 


3133 


012566 








5$: 






3134 


012566 


022737 


012322 


000042 




CMP 


«$EN0A0.9«42 


3135 


012574 


001001 








BNE 


6) 


3136 


012576 


000000 








HALT 




3137 


012600 








6$: 






3138 


012600 


000002 








RTI 





3139 
3140 
3141 
3142 
3143 
3144 
3145 
3146 
3147 
3148 
3149 
3150 
3151 
3152 
3153 
3154 
3155 
3156 
3157 
3158 
3159 
3160 
3161 
3162 
3163 
3164 
3165 
3166 
3167 
3168 
3169 
3170 
3171 
3172 
3173 
3174 
3175 
3176 
3177 



012602 
012602 
012606 
012610 
012612 
012616 



104401 
010046 
005000 
153700 
001004 



012620 013746 



001075 
001014 
001016 



012624 
012626 
012630 
012632 
012634 
012636 
012640 
012644 
012650 
012652 
012654 
012656 
012662 
012666 
012670 
012672 
012674 
012700 
012702 
012704 
012706 



104402 
000426 
005300 
006300 
006300 
006300 
062700 
012037 
001404 
104401 
000000 
104401 
012037 
001404 
104401 
000000 
104401 
011000 
001004 
012600 
104401 



001160 
012654 



001075 
012672 



001075 
001075 



APT ERROR LOOP 

HALT ON ERROR 

SKIP IF CONTINUE 

HALT ON ERROR! 

TEST FOR CHANGE IN SOFT-SUR 

LOOP ON ERROR SWITCH SET? 

BR IF NO 

FUDGE RETURN FOR LOOPING 
CHECK FOR AN ESCAPE ADDRESS 
BR IF NONE 

FUDGE RETURN ADDRESS FOR ESCAPE 

ACT -11 AUTO- ACCEPT? 
BR IF NO 
;YES 

; RETURN 



>SBTTL ERROR MESSAGE TYPEOUT ROUTINE 

**************************************************************** 

*THIS ROUTINE USES THE "ITEM CONTROL BYTE" (*ITEMB) TO DETERMINE WHICH 
♦ERROR IS TO BE REPORTED. IT THEN OBTAINS. FROM THE "ERROR TABLE" ($ERRTB). 
♦AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 



$ERR1YP: 



1$: 



21: 
31: 

41 
5> 
61 



TYPE 

MOV 

CLR 

BIS8 

BNE 

MOV 

TYPOC 

BR 

DEC 

ASL 

ASL 

ASL 

ADO 

MOV 

BEQ 

TYPE 

.WORD 

TYPE 

MOV 

BEQ 

TYPE 

.WORD 

T1PE 

MOV 

BNE 

MOV 

TYPE 



.$CRLF 

RO.-CSP) 

RO 

a*$ITEMB.RO 
1$ 

»ERRPC.-(SP) 



6$ 
RO 
RO 
90 
RO 

**ERRT8,R0 

(R0)*.2I 

31 

0 

.♦CRLF 

(R0)*.4$ 

5« 

0 

•ICRLF 

(RO),RO 

7* 

(SP)*.RO 
. ♦CRLF 



5 } "CARRIACX RETURN" 6 "LINE FEED" 
;;SAVE RO 

} ; PICKUP THE ITEM INDEX 

jsIF ITEM NUMBER IS ZERO. JUST 
jjTYPE THE PC OF THE ERROR 
! J SAVE *ERRPC FOR TYPEOUT 
::ERROR AOORESS 

5sG0 TYPE--OCTAL ASCIKALL DIGITS) 
iiGET OUT 

ADJUST THE irCEX SO THAT IT WILL 
SI WORK FOR T« ERROR TABLE 



sFORM TABLE POINTER 

, PICKUP "ERROR MESSAGE" POINTER 

;SKIP TYPEOUT IF NO POINTER 

{TYPE THE "ERRCR MESSAGE" 

; "ERROR MESSAGE" POINTER GOES HERE 

, "CARRIAGE RETUi'N" £ "LINE FEED" 

! PICKUP "DATA HEADER" POINTER 

jSKIP TYPEOUT IF 0 

{TYPE THE "DATA HEADER" 

{"DATA HEADER" POINTER GOES HERE 

{"CARRIAGE RETURN- 6 "LINE FEED" 

J PICKUP "DATA TABLE" POINTER 

{GO TYPE THE DATA 

'RESTORE RO 

i "CARRIAGE RETURN" 6 "LINE FEED" 



H5 
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SEO 0059 



3178 
3179 
3180 
3181 
3182 
3183 
3184 
3185 
3186 
3187 
3188 
3189 
3190 
3191 
3192 
3193 
3194 
3195 
3196 
3197 
3198 
3199 
3200 
3201 
3202 
3203 
3204 
3205 
3206 
3207 
3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 
3217 
3218 
3219 
3220 
3221 
3222 
3223 
3224 
3225 
3226 
3227 
3228 
3229 
3230 
3*i31 
3232 
3233 



012712 
012714 
012714 
012716 
012720 
012722 
012724 
012730 
012732 



012736 
012744 

012752 
012754 
012756 
012760 
012762 
012764 
012766 
012772 
012776 
013004 
013006 



013010 
013016 
013022 
013026 
013030 
013032 
013034 
013036 
013040 
013042 
013050 
013056 
013062 
013066 
013070 
013072 
013074 
013076 
013100 
013102 
013104 
013112 



000207 

013046 
104402 
005710 
001770 
104401 
000771 
020040 
012736 



012737 
012737 
010046 
010146 
010246 
010346 
010446 
010546 
017746 
010637 
012737 
000000 
000776 



012737 
013706 
012677 
012605 
012604 
012603 
012602 
012601 
012600 
012737 
012737 
005037 
005237 
001375 
104401 
013104 
000002 
000000 
000776 
000000 
005015 
000122 



7$: 



012732 
000 



8$; 



RTS 

MOV 

TYPOC 

TST 

BEQ 

TYPE 

BR 

.ASCIZ 
.EVEN 



PC 

aCRO)*. (SP) 

(RO) 
6i 
.8* 
7* 

/ / 



; RETURN 

iSAVE a(RO)* FOR TYPEOUT 

:G0 TYPE-OCTAL ASCIKALL DIGITS) 

;IS THERE ANOTHER NUTCER? 

;BR IF NO 

J TYPE TU0(2) SPACES 
sLOOP 

:TU0(2) SPACES 



013076 
000340 



000024 
000026 



.SBT'... POWER DOUN AND UP ROUTINES 
:*P0UER DOUN ROUTINE 



166046 
013102 
013010 



000024 



i^URDN: HOV 
MOV 
MOV 
HOV 
HOV 
MOV 
MOV 
HOV 
HOV 
HOV 
HOV 
HALT 
BR 



*$ILLUP.a#PURVEC {SET FOR FAST L 
»340.S«PURVEC«2 iPRI0:7 



RO.-(SP) 
Rl.-(SP) 
R2.-CSP) 
R3.-(SP) 
R4.-(SP) 
R5.-(SP) 
aSWR.-(SP) 
SP,*SAVR6 



(PUSH RO ON STACK 
iPUSH Rl ON STACK 
;PUSH R2 ON STACK 
:PUSH R3 ON STACK 
;PUSH R4 ON STACK 
sPUSH R5 ON STACK 
.•PUSH 8SUR ON STACK 
;SAVE SP 



»$PURUP.a«PURVEC :SET UP VECTOR 
sHANG UP 



013076 
013102 
166012 



5*P0UER UP ROUTINE 
: • *************************************************************** 



000024 «PURUP: 



012736 
000340 
013102 
013102 



000024 
000026 



047520 042527 



1$: 



$PWRMG: 

*ILLUP: 

$SAVR6: 
$POUER: 



HOV 

MOV 

MOV 

MOV 

MOV 

MOV 

HOV 

MOV 

MOV 

MOV 

MOV 

CLR 

INC 

BNE 

TYPE 

.WORD 

RTI 

HALT 

BR 

0 

.ASCIZ 



♦IILLUP.MPWRVEC iSET FOR FAST OOIM 



ISAVR6.SP ;GET SP 

(SP)«.aSUR :POP STACK 
(SP)».R5 

(SP)»,R4 ;POP 

CSP)*.R3 iPOP 

(SP)».R2 jPOP 

(SP)«.R1 jPOP 

(SP)».RO jPOP 
«IPURDN.a«f>URVEC iSET 



INTO 3SUR 



STACK INTO R4 
STACK INTO R3 
STACK INTO R2 
STACK INTO Rl 
STACK INTO RO 
UP THE POUER 



DOUN VECTOR 



«340.8«^VEC«2 ! PRIG: 7 
♦SAVR6 J WAIT LOOP FOR THE TTY 

$SAVR6 ;WAIT FOR THE INC 

1) ;0F WORD 

s REPORT THE POWER FAILURE 
♦POUER ; POUER FAIL MESSAGE POINTER 



.-2 

<15><12> "POUER" 



;THE POUER UP SEQUENCE WAS STARTED 
J BEFORE THE POUER DOUN UAS COMPLETE 
;PUT THE SP HERE 



15 



040000 165714 1$ 
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3234 
3235 
3236 
3237 
3238 
3239 
3240 
3241 
3242 
3243 
3244 
3245 
3246 
3247 
3246 

3249 013114 

3250 013114 

3251 013116 

3252 013124 
3253 
3254 
3255 

3256 013130 

3257 013134 
3256 013142 

3259 013146 

3260 013152 

3261 013154 

3262 013156 

3263 013162 

3264 013164 

3265 013164 

3266 013170 

3267 013172 

3268 013200 

3269 013202 

3270 013210 

3271 013212 

3272 013216 

3273 013222 

3274 013230 

3275 013234 

3276 013240 

3277 013244 

3278 013252 

3279 013260 

3280 015264 
3281 

3282 
3283 
3284 
3285 
3286 

3287 013266 

3288 013274 

3289 013302 
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104407 
032777 
001052 



013126 000416 



013746 
012737 
005737 
012637 
000421 
022626 
012637 
000407 

105737 
001412 
032777 
001404 
013737 
000420 
105037 
105237 
113737 
011637 
011637 
005037 
112737 
013777 
013716 
000002 



000004 
013154 
177060 
000004 



000004 



001003 

001000 

001010 

001003 
001002 
001002 
001006 
001010 
001072 
000001 
001002 
001006 



000004 



165640 
001006 

001104 



001015 
165562 



.SBTTL SCOPE HANDLER ROUTINE 

*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT UILL INCREMENI 

♦AND LOAD THE TEST NUMBERC ♦TSTNM) INTO THE DISPLAY REG,(DISPLAY<7:0>) 

*AND LOAD THE ERROR FLAG ($ERFLG) INTO DISPLAY<15:08> 

*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

*SU14-1 LOOP ON TEST 

♦SU09-1 LOOP ON ERROR 

*CALL 

* SCOPE sj SCOPE- lOT 



♦SCOPE: 

CKSUR 

BIT «eiT14.9SUR 
BNE lOVER 
:««M«START OF CODE FOR THE XOR 
tXTSTR: BR 6« 



MOV 
MOV 
TST 
MOV 
BR 
CMP 
MOV 
BR 

6$::»««««END 



5* 



2$: 



TSTB 
BEQ 
BIT 
BEQ 
MOV 
BR 

CLRB 



7*: 
4*: 

ISVLAD: INCB 
MOVB 
MOV 
hOM 
CLR 
MOVB 

lOVER: MOV 
MOV 
RTI 



a#ERRVEC.-(SP) 

»SI.8«ERRVEC 

8*177060 

(SP)«.fl#€RRVEC 

♦SVLAO 

(SP)«.(SP)* 

(SP)«.S«ERRVEC 

71 

OF CODE FOR THE XOR 
♦ERFLG 
tSVLAO 
«6IT09.8SUR 
41 

ILPERR.ILPAOR 

♦OVER 

♦ERFLG 

♦TSTNM.ITESTN 

(SP),$LPADR 

(SP).»LPERR 

♦ESCAPE 

♦I.IERMAX 

♦TSTW.aOISPLAY 

♦LPAOR.CSP) 



TEST FOR CHANGE IN SOFT-SUR 
LOOP ON PRESENT TEST? 
YES IF SU14-1 
ESTER^MM 
IF RUNNING ON THE "XOR" TESTER CHANGE 
THIS INSTRUCTION TO A "NOP" (NOP-240) 
SAVE TfC CONTENTS OF THE ERROR VECTOR 
J I SET FOR TIMEOUT 
TIME OUT ON XOR? 
RESTORE THE ERROR VECTOR 
GO TO THE NEXT TEST 
jjaEAR THE STACK AFTER A TIME OUT 

i > restore the error vector 
loop on the present test 
Tester 

has an error occurred? 

BR IF NO 
LOOP ON ERROR? 
BR IF NO 
i }SET LOOP ADDRESS TO LAST SCOPE 



ZERO THE ERROR FLAG 
COUNT TEST NUtCERS 
SET TEST NUMBER IN APT MAILBOX 
SAVE SCOPE LOOP ADDRESS 
SAVE ERROR LOOP ADDRESS 
aEAR THE ESCAPE FROM ERROR ADDRESS 
0I4.Y ALLOW QNE(l) ERROR ON NEXT TEST 
DISPLAY TEST NUMBER 
FUDGE RETURN ADDRESS 
s I FIXES PS 



.SBTTL APT COMtWNICATIONS ROUTINE 

• ;***************«4i ********************************************** 



112737 000001 013532 
112737 000001 013530 
000403 



♦ATYl: MOVB 
IATY3: MOVB 
BR 



#1.»FFLG 
♦1,»MFLG 
♦AtYC 



sTO REPORT FATAL ERROR 
;T0 TYPE A MESSAGE 



J5 
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3290 


013304 


112737 


000001 


013532 


tATY4: 


MOVB 


#1.$FFLG 


3291 


013312 








♦ATYC: 






3292 


013312 


010046 








MOV 


RO.-(SP) 


3293 


013314 


010146 








MOV 


Rl.-(SP) 


3294 


013316 


105737 


013530 






TSTB 


♦MFLG 


3295 


013322 


001450 








BEQ 


5$ 


32% 


013324 


122737 


000001 


001120 




CMPB 


*APTENV,$ENV 


3297 


013332 


001031 








BNE 


3$ 


3296 


013334 


132737 


000100 


001121 




BITB 


»APTSPOOL , $ENVM 


3299 


013342 


001425 








BEQ 


3* 


3300 


013344 


017600 


000004 






MOV 


84(SP),R0 


3301 


013350 


062766 


000002 


000004 




ADD 


*2,4(SP) 


3302 


013356 


005737 


001100 




1$: 


TST 


♦MSGTYPE 


3303 


013362 


001375 








BNE 


1$ 


■'304 


013364 


010037 


001114 






MOV 


RO.IMSGAO 


o305 


013370 


105720 






2$: 


TSTB 


(RO)* 


3306 


013372 


001376 








BNE 


2$ 


3307 


013374 


163700 


001114 






SUB 


♦MSGAD.RO 


3306 


013400 


006200 








ASR 


RO 


3309 


013402 


010037 


001116 






MOV 


RO.$MSGLGT 


3310 


013406 


012737 


000004 


001100 




MOV 


#4,$MSGTYPE 


3311 


013414 


000413 








BR 


5$ 


3312 


013416 


017637 


000004 


013442 


3$: 


MOV 


84(SP),4$ 
♦2.4(SP) 


3313 


013424 


062766 


000002 


000004 




ADD 


3314 


013432 


013746 


177776 






MOV 


177776, -CSP) 
PC, $ TYPE 


3315 


013436 


004737 


013534 






JSR 


3316 


013442 


000000 






4$: 


.WORD 


0 


3317 


013444 








51: 






3318 


013444 


105737 


013532 




101: 


TSTB 


♦FFLG 


3319 


013450 


001413 








BEQ 


12$ 


3320 


013452 


005737 


001120 






TST 


$ENV 


3321 


013456 


001410 








BEQ 


12$ 


3322 


013460 


005737 


001100 




11$: 


TST 


A AaM#^ V 

$MSGTYPE 


3323 


013464 


001375 








BNE 


11$ 


3324 


013466 


017637 


000004 


001102 




MOV 


84(SP),$FATAL 


3325 


013474 


005237 


001100 






INC 


$MSGTYPE 


3326 


013500 


062766 


000002 


000004 


12$: 


ADD 


*2,4(SP) 

$fFlg 


3327 


013506 


105037 


013532 






CLRB 


3328 


013512 


105037 


013531 






CLRB 


$LFLG 


3329 


013516 


105037 


013530 






CLRB 


$MFLG 


3330 


013522 


012601 








MOV 


CSP)*,R1 


3331 


013524 


012600 








MOV 


(SP)*,R0 


3332 


013526 


000207 








RTS 


PC 


3333 


013530 


000 






$MFLG: 


.BYTE 


0 


3334 


013531 


000 






$LFLG: 


.BYTE 


0 


3335 


013532 


000 






$FFLG: 


.BYTE 


0 


3336 
















3337 




013534 








.EVEN 




3338 




000200 






APTSIZE-200 




3339 




000001 






APTENV'OOl 




3340 




000100 






APTSPOOL-100 




3341 




000040 






APTCSUP-040 




3342 
















3343 
















3344 










.SBTTL 


TYPE ROUTINE 


3345 

















PAGE 62 



3EQ 0061 



:T0 ONLY REPORT FATAL ERROR 

iPUSH RO ON STACK 

{PUSH Rl ON STACK 

s SHOULD TYPE A MESSAGE? 

;IF NOT: BR 

; OPERATING UNDER APT? 

;IF NOT: BR 

; SHOULD SPOX MESSAGE? 
;IF NOT: BR 
:GET MESSAGE ADDRESS 
sBUMP RETURN ADDRESS 

;SEE IF DONE U/ LAST XMISSION? 
J IF NOT: UAIT 
sPUT ADDRESS IN MAILBOX 
jFIND END OF MESSAGE 

;SUB START OF MESSAGE 
:GET MESSAGE LENGTH IN UOROS 
:PUT LENGTH IN MAILBOX 
sTELL APT TO TAKE MESSAGE 

:PUT MSG AOOR IN JSR LIM<AGE 
;BUMP RETURN ADDRESS 
jPUSH 177776 CN STACK 
:CALL TYPE MACRO 



; SHOULD REPORT FATAL ERROR? 
{IF NOT: BR 
{RUNNING mOER APT? 
:IF NOT: BR 

{FINISHED LAST MESSAGE? 
J IF NOT: WAIT 
{GET ERROR « 
{TELL APT TO TAKE ERROR 
{BUMP RETURN ADDRESS 
{CLEAR FATAL FLAG 
{CLEAR LOG FLAG 
{CLEAR MESSAGE FLAG 
{POP STACK INTO Rl 
{POP STACK INTO Rl 
{RETURN 

{LOG FLAG 
{FATAL FLAG 



<5 
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SEQ 0062 



'^X4A 








3347 
































3351 








3352 








3353 








3354 








3355 








3356 








3357 








3358 








3359 








3360 








3361 


013534 


105737 


001057 


3362 


013540 


100002 




3363 


013542 


000000 




3364 


013544 


000430 




3365 


013546 


010046 




3366 


013550 


017600 


000002 


3367 


013554 


122737 


000001 


3368 


013562 


001011 




3369 


013564 


132737 


000100 


3370 


013572 


001405 




3371 


013574 


010037 


013604 


3372 


013600 


004737 


013274 


3373 


013604 


000000 




3374 


013606 


132737 


000040 


3375 


013614 


001003 




3376 


013616 


112046 




3377 


013620 


001005 




3378 


013622 


005726 




3379 


013624 


012600 




3380 


013626 


062716 


000002 


3381 


013632 


000002 




3382 


013634 


122716 


000011 


3383 


013640 


001430 




3384 


013642 


122716 


000200 


3385 


013646 


001006 




3386 


013650 


005726 




3387 


013652 


104401 




3388 


013654 


001075 




3389 


013656 


105037 


014064 


3390 


013662 


000755 




3391 


013664 


004737 


013746 


3392 


013670 


123726 


001056 


3393 


013674 


001350 




3394 


013676 


013746 


001054 


3395 








33% 


013702 


105366 


000001 


3397 


013706 


002770 




3398 


013710 


004737 


013746 


3399 


013714 


105337 


014064 


3400 


013720 


000770 




3401 









• *************************************************************** 

♦ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 BYTE. 
*THE ROUTINE WILL INSERT A NUMBER C." NULL CHARACTERS AFTER A LINE FEED. 



*N0TE1 
*N0TE2 
*N0TE3 



$NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REOUIREO. 
♦FILLC CONTAINS THE CHARACTER TO FILL AFTER. 



*CALL: 

*1) USING A TRAP INSTRUCTION 

* TYPE .MESADR 
*0R 

* TYPE 

* MESADR 
* 



♦TYPE: 



1$: 



61i: 
621: 

2$: 



60$: 
31: 

4$: 



51: 
61: 



7*: 



TSTB 

BPL 

HALT 

BR 

MOV 

MOV 

CMPB 

BNE 

BITB 

BEQ 

MOV 

JSR 

.WORD 

BITB 

BNE 

MOVB 

BNE 

TST 

MOV 

ADD 

RTI 

CMPB 

BEQ 

CMPB 

BNE 

TST 

TYPE 

♦CRLF 

CLRB 

BR 

JSR 

CMPB 

BNE 

MOV 

OECB 

BLT 

JSR 

OECB 

BR 



s; MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 



♦TPFLG 
II 

31 

RO,-(SP) 
a2(SP).R0 
#APTENV,*ENV 
621 

♦APTSPOOL.IENVM 
621 

R0.61$ 

PC.IATY3 

0 

•APTCSUP.IENVM 
601 

(RO)*.-(SP) 
41 

(SP)* 

(SP)*.RO 

«2.(SP) 

«HT,(SP) 
8$ 

#CRLF.(SP) 
5« 

(SP)» 



$CHARCNT 
2t 

PC.ITYPEC 

IFILLC.CSP)^ 

21 

$NULL.-(SP) 

KSP) 
61 

PC.$TYPEC 

ICHARCNT 

7$ 



siIS THERE A TERMINAL? 
: (BR IF YES 

: :HA1 T HERE IF NO TERMINAL 
: (LEAVE 
{ iSAVE RO 

: {GET ADDRESS OF ASCIZ STRING 

; {RUTMING IN APT MODE 

isNO.GO CHECK FOR APT CONSOLE 

s J SPOOL MESSAGE TO APT 

: iNO.GO CHECK FOR CONSOLE 

J i SETUP MESSAGE ADDRESS FOR APT 

! J SPOOL MESSAGE TO APT 

:: MESSAGE ADDRESS 

jjAPT CONSOLE SUPPRESSED 

YES. SKIP TYPE OUT 
} ;PUSH CHARACTER TO BE TYPED ONTO STACK 
cBR IF IT ISN'T THE TERMINATOR 
J J IF TERMINATOR POP IT OFF T« ST/-CK 
i {RESTORE RO 
; {ADJUST RETURN PC 
{{RETURN 

; {BRANCH IF <HT> 

{ {BRANCH IF NOT <CRLF> 

{{POP <CR><LF> EQUIV 
({TYPE A CR AND LF 

;t CLEAR CHARACTER COUNT 

: {GET NEXT CHARACTER 

{{GO TYPE THIS CHARACTER 

;;IS IT TIME FOR FILLER CHARS.? 

{{IF NO GO GET NEXT CHAR. 

{{GET # OF FILLER CHARS. NEEDED 

{{AND THE NULL CHAR. 

{{DOES A NULL NEED TO BE TYPED? 

{{BR IF NO- -GO POP THE NULL OFF OF STACK 

{{GO TYPE A NULL 

{{DO NOT COUNT AS A COUNT 

{{LOOP 



L5 
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i£Q 0063 



; HORIZONTAL TAB PROCESSOR 



3404 


01^722 


112716 


000040 




8$- 


MOVB 


#' ,(SP) 


3405 


013726 


004737 


013746 




9$: 


JSR 


PCHYPEC 


3406 


013732 


132737 


000007 


014064 




BITB 


«7 , iCHARCNT 


3407 


013740 


(X)1372 








BNE 


9$ 


3408 


013742 


005726 








TST 


(SP)* 


3409 


013744 


000724 








BR 


2i 


3410 


013746 








JTYPEC: 






3411 


013746 


105777 


165072 






TSTB 


3»TKS 


3412 


013752 


100022 








BPL 


10 i 


3413 


013754 


017746 


165066 






MOV 


aiTKB.-CSP) 


3414 


013760 


042716 


177600 






BIC 


#177600, (SP) 
#IXOFF,(SP) 


3415 


013764 


122716 


000023 






CMPB 


3416 


013770 


001012 








BNE 


1021 


3417 


013772 








101$: 






3418 


013772 


105777 


165046 






TSTB 


9$TKS 


3419 


013776 


100375 








BPL 


101$ 


3420 


014000 


117716 


165042 






MOVB 


a$TKB,(SP) 


3421 


014004 


042716 


177600 






BIC 


#177600. (SP) 


3422 


014010 


122716 


000021 






CMPB 


»$XON.(SP) 


3423 


014014 


001366 








BNE 


101$ 


3424 


014016 








1021: 






3425 


014016 


005726 








TST 


(SP)* 


3426 


014020 








101: 






3427 


014020 


105777 


165024 






TSTB 


a$TPS 


3428 


014024 


100375 








BPL 


10$ 


3429 


014026 


116677 


000002 


165016 




MOVB 


2(SP),a$TPB 


3430 


014034 


122766 


000015 


000002 




CMPB 


#CR.2(SP) 


3431 


014042 


001003 








BNE 


1$ 


3432 


014044 


105037 


014064 






aRB 


$CHARCNT 


3433 


014050 


000406 








BR 


$TYPEX 


3434 


014052 


122766 


000012 


000002 


1$: 


CMPB 


#LF.2(SP) 
$ TYPEX 


3435 


014060 


001402 








BEQ 


3436 


014062 


105227 








INCB 


(PC)* 


3437 


014064 


000000 






$CHARCNT:.UORO 


0 


3438 


014066 


000207 






♦TYPEX: 


RTS 


PC 



3439 
3440 
3441 
3442 
3443 
3444 
3445 
3446 
3447 
3448 
3449 
3450 
3451 
3452 
3453 
3454 
3455 
3456 
3457 



REPLACE TAB UITH SPACE 
TYPE A SPACE 
BRANCH IF NOT AT 
TAB STOP 

POP SPACE OFF STACK 
GET NEXT CHARACTER 

CHAR IN KYBO BUFFER? 
BR IF NOT 
GET CHAR 

STRIP EXTRANEOUS BITS 
UAS CHAR XOFF 
BR IF NOT 



::UAIT FOR CHAR 



GET CHAR 
STRIP IT 
UAS IT XON? 
BR IF NOT 



jsFIX STACK 

; sUAIT UNTIL PRINTER IS READY 

jjLOAD CHAR TO BE TYPED INTO DATA REG. 
iilS CHARACTER A CARRIAGE RETURN? 
:;BRANCH IF NO 

jiYES— aEAR CHARACTER COUNT 
; J EXIT 

i:IS CHARACTER A LINE FEED? 

; jBRANCH IF YES 

({COUNT THE CHARACTER 

i {CHARACTER COUNT STORAGE 



.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 

•THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-0I6IT 
♦OCTAL (ASCII) NUMBER AND TYPE IT. _ 
*$TYPOS-- -ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
♦CALL: 

MOV NUM,-(SP) { {NUMBER TO BE TYPED 

TYPOS {{CALL FOR TYPEOUT 

.BYTE N {{N-1 TO 6 FOR NUMBER OF DIGITS TO TYPE 

.BYTE H ,{M«1 OR 0 

{{l-TYPE LEADING ZEROS 
{{0-SUPPRESS LEADING ZEROS 



MJOOOJ 

MXOOl 

MJOOOl 

MXOOl 

MJOOOl 

MXOOl 

MXOOl 

MXOOl 

MXOOl 

MXOOl 

MXOOl 

MXOOl 

MXOOl 

MXOOl 

MXOOl 

MXOOl 

MXOOl 



♦$TYPON ENTER HERE TO TYPE OUT UITH THE SAME PARAMETERS AS THE LAST 

♦$TYPOS OR $TYPOC 
♦CALL: 

♦ MOV NUM,-(SP) { {NUMBER TO BE TYPE J 
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5EQ 0064 











































■*a£.t 


















n 14070 


01 IfM^ 
VX fOHO 


nooooo 






1 1M>'Y7 


000001 


■J^w f 




1 126^7 

XXCv J > 


014315 

VX*V JX J 






062716 

■ Xw 


000002 




0141 19 


000406 






014114 
vx^xx^ 


1 \P1\7 


000001 




0141?? 


112737 


000006 

WWW 




014130 




000005 

wwww 


3473 


014136 


010346 




3474 


014140 


010446 

\/X V ' 




3475 


014142 


010546 




3476 


014144 


113704 

X X w f 


014315 


3477 


014150 


005404 




3478 


014152 

VX^X 


062704 


000006 

WWW 


3479 


014156 


110437 


014314 


34A0 


014162 

VX~ X 


113704 


014313 


3481 


014166 


016605 


000012 


3482 


014172 


005003 




3483 


014174 


006105 




3484 


014176 


000404 




3485 


014200 


006105 




3486 


014202 


006105 




3487 


014204 


006105 




3488 


014206 


010503 




3489 


014210 


006103 




3490 


014212 


105337 


014314 


3491 


014216 


100016 

X wWXW 




3492 


014220 


042703 


177770 


3493 


014224 


001002 

WX Wfc 




3494 


014226 


005704 




3495 


014230 


(X)1403 




3496 


014232 


005204 




3497 


014234 


052703 


000060 


3498 


014240 


052703 


000040 

WW^V 


3499 


014244 


110337 


014310 


3500 


014250 


104401 

XV^^ wx 


014310 


3501 


014254 


105337 


014312 


3502 


014260 


003347 




3503 

^^^^ 




00240? 




3504 


014264 


005204 




3505 


014266 


000744 




3506 


014270 


012605 




3507 


014272 


012604 




3508 


014274 


012603 




3509 


014276 


016666 


000002 


3510 


014304 


012616 




3511 


014306 


000002 




3512 


014310 


000 




3515 


014311 


000 





{* 

;* 



TYPON 



:;CALL FOR TYPEOUT 



;*$TYPOC-- -ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
• *CALL • 

\* ' MOV NUri.-(SP) siNUMBER TO BE TYPED 

;* TYPOC J 5 CALL FOR TYPEOUT 



014313 



014313 
014315 
014312 



$ TYPOS: 



♦TYPOC: 
♦TYPON: 



1»: 
2»: 



3»: 



000004 



4»: 

5«: 



7»: 



6»: 



8»: 



MOV a(SP).-(SP) 

MOVB 1(SP).»0FILL 

MOVB (SP)«.»0M00E*1 

ADO «2.(SP) 

BR * TYPON 

MOVB «1,*0FILL 

MOVB «6.*0M00E«1 

MOVB #5,»0CNT 

MOV R3.-(SP) 

MOV R4,-(SP) 

MOV R5.-(SP) 

MOVB I0M00E«1.R4 

NEC R4 

ADO «6.R4 

MOVB R4.$0MOOE 

MOVB ♦0FILL.R4 

MOV 12(SP).R5 

CLR R3 

RX R5 

BR 31 

ROL R5 

ROL R5 

ROL R5 

MOV R5,R3 

ROL R3 

OECB tOMOOE 

BPL 7» 

BIC #177770. R3 

BNE 4$ 

TST R4 

BEQ 5» 

INC R4 

BIS »'0.R3 

BIS #' .R3 

MOVB R3.8$ 

TYPE ,8» 

OECB lOCNT 

BGT 21 

BLT 6* 

INC R4 

BR 21 

MOV (SP)*.R5 

MOV (SP)*.R4 

MOV (SP)*.R3 

MOV 2(SP).4(SP) 

MOV (SP)*.(SP) 

RTI 

.BYTE 0 

.BYTE 0 



.s PICKUP THE MODE 
SjLOAD ZERO FILL SWITCH 
j;NUMBER OF DIGITS TO TYPE 
;s AD JUST RETURN ADDRESS 

;jSET THE ZERO FILL SUITCH 
t:SET FOR SIX(6) DIGITS 

;SET THE ITERATION COUNT 

:SAVE R3 

tSAVE R4 

.SAVE R5 

jGET THE NUMBER OF DIGITS TO TYPE 



s SUBTRACT IT FOR MAX. ALLOWED 
SAVE IT FOR USE 
GET THE ZERO FILL SUITCH 
PICKUP THE INPUT NUMBER 
CLEAR THE 0«JTPUT UORO 
ROTATE MSB INTO "C" 
60 00 MSB 

jFORM THIS DIGIT 



;GET LS8 OF THIS DIGIT 

;TYPE THIS DIGIT? 

sBR IF NO 

;GET RID OF JUK 

5 TEST FOR 0 

5 SUPPRESS THIS 0? 

■BR IF YES 

loON'T SUPPRESS ANYMORE O'S 

;MAKE THIS DIGIT ASCII 

;MAKE ASCII IF NOT ALREADY 

sSAVE FOR TYPING 

iGC TYPE THIS DIGIT 

;COUNT BY 1 
J ;BR IF MORE TO DO 
isBR IF DOrC 

f! INSURE LAST DIGIT ISN'T A BLANK 
: iGO DO THE LAST DIGIT 
5 1 RESTORE R5 
; {RESTORE R4 
i {RESTORE R3 

{{SET THE STACK FOR RETURNING 
{ {RETURN 

{{STORAGE FOR ASCII DIGIT 
{{TERMINATOR FOR TYPE ROUTINE 
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5514 
3515 
3516 
3517 

3518 
3519 
3520 
3521 
3522 
3523 
3524 
3525 
3526 
3527 
3528 
3529 
3530 
3531 
3532 
3533 
3534 
3535 
3536 
3537 
3538 
3539 
3540 
3541 
3542 
3543 
3544 
3545 
3546 
3547 
3548 
3549 
3550 
3551 
3552 
3553 
3554 
3555 
3556 
3557 
3558 
3559 
3560 
3561 
3562 
3563 
3564 
3565 
3566 
3567 
3568 
3569 



014312 
014313 
014314 



014316 
014316 
014320 
014-^22 
014124 
014326 
014330 
014334 
014340 
014342 
014344 
014352 
014354 
014360 
014364 
014366 
014372 
014374 
014376 
014400 
014402 
014404 
014406 
014410 
014412 
014414 
014416 
014420 
014426 
014432 
014436 
014440 
014442 
014446 
014450 
014452 
014454 
014456 
014460 
014462 
014470 



000 
000 
000000 



010046 
010146 
010246 
010346 
010546 
012746 
016605 
100004 
005405 
112766 
005000 
012703 
112723 
005002 
016001 
160105 
002402 
005202 
000774 
060105 
005702 
001002 
105716 
100407 
106316 
103003 
116663 
052702 
052702 
110223 
005720 
020027 
002746 
003002 
010502 
000764 
105726 
100003 
116663 
105013 



020200 
000020 



000055 000001 



014532 
000040 

014522 



000001 177777 

000060 

000040 



000010 
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BINARY TO OCTAL (ASCII) AND TYPE 

♦OCNT: .BYTE 0 j; OCTAL DIGIT COUNTER 

♦OFILL: .BYTE 0 jsZERO FILL SWITCH 

$OMOOE: .WORD 0 ; i NUMBER OF DIGITS TO TYPE 

.SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 

♦THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT 
♦SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
♦NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
♦BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
♦REPLACED WITH SPACES. 



EQ 0065 



♦CALL I 
♦ 



*TYPDS: 



1$: 



2i: 
3«: 



4$: 



5*: 



61: 
7*: 



177777 177776 



8»: 



9»! 



MOV 


NUM.-(SP) 


TYPDS 


MOV 


RO.-(SP) 


MOV 


Rl.-(SP) 


MOV 


R2.-(3P) 


MOV 


R3.-(SP) 


MOV 


R5.-(SP) 


MOV 


#20200. -(SP) 


MOV 


20(SP).R5 


BPL 


1$ 


NEG 


R5 


MOVB 


#'-.l(SP) 


CLR 


RO 


MOV 


«$DBLK.R3 


MOVB 


#' .(R3)» 


CLR 


R2 


MOV 


♦DTBL(R0).R1 


SUB 


R1.R5 


BLT 


4$ 


INC 


R2 


BR 


31 


ADD 


R1.R5 


TST 


R2 


BNE 


51 


TSTB 


(SP) 


BMI 


71 


ASLB 


(SP) 


BCC 


6« 


MOVB 


1(SP).-1(R3) 


BIS 


#'0.R2 


BIS 


#' ,R2 


MOVB 


R2.(R3)* 


TST 


(R0)» 


CMP 


R0.»10 


BLT 


2« 


BGT 


8« 


MOV 


R5.R2 


BR 


61 


TSTB 


(SP)* 


BPL 


91 


MOVB 


-1(SP).-2(R3) 


CLRB 


(R3) 



s ;PUT THE BINARY NUMBER ON THE STACK 
;sGO TO THE ROUTINE 



PUSH RO ON STACK 
PUSH Rl ON STACK 
PUSH R2 ON STACK 
PUSH R3 ON STACK 
PUSH R5 ON STACK 
SET BLANK SWITCH AND SIGN 
GET THE INPUT NUMBER 
iBR IF INPUT IS POS. 
;MAKE THE BINARY NUMBER POS. 
isMAKE THE ASCII NUMBER NEG. 
sZERO THE CONSTANTS INDEX 
! SETUP THE OUTPUT POINTER 
J SET THE FIRST CHARACTER TO A BLANK 
isaEAR THE BCD NUMBER 
; {GET THE CONSTANT 
tsFORM THIS BCD DIGIT 
: iBR IF DONE 

> {INCREASE THE BCD DIGIT BY 1 

ADO BACK THE CONSTANT 
CHECK IF BCD DIGIT-0 
FALL THROUGH IF 0 
STILL DOING LEADING O'S? 
BR IF YES 
MSD? 
J iBR IF NO 
{5 YES- -SET THE SIGN 
MAKE THE BCD DIGIT ASCII 
MAKE IT A SPACE IF NOT ALREADY A DIGIT 
PUT THIS CHARACTER IN THE OUTPUT BUFFER 
JUST INCREMENTING 
{CHECK THE TABLE INDEX 
{GO DO THE NEXT DIGIT 
sGO TO EXIT 
{GET THE LSD 
{GO CHANGE TO ASCII 
{WAS THE LSD THE FIRST NON-ZERO? 
.{BR IF NO 

{{ YES -SET THE SIGN FOR TYPING 
{{SET THE TERMINATOR 
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SEO 006o 



3570 

3571 

3572 

3573 

3574 

3575 

3576 

3577 

3578 

3579 

3580 

3581 

3582 

3583 

3584 

3585 

3586 

3587 

3588 

3589 

3590 

3591 

3592 

3593 

3594 

3595 

35% 

3597 

3598 

3599 

3600 

3601 

3602 

3603 

3604 

3605 

3606 

3607 

3608 

3609 

3610 

3611 

3612 

3613 

3614 

3615 

3616 

3617 

3618 

3619 

3620 

3621 

3622 

3623 

3624 

3625 



014472 
014474 
014476 
014500 
014502 
014504 
014510 
014516 
014520 
014522 
014524 
014526 
014530 
014532 



012605 






MOV 


fSP)* RS 




012603 






MOV 




t I POP <;TAfK TNTO R'^ 


012602 






MOV 


(SP)* R? 


• - POP <iTArK TNTf) R? 


012601 






MOV 


(SPV Rl 


• -POP STACK TNTQ Rl 


012600 






MOV 


(SP)*,RO 


;{POP STACK INTO RO 


104401 


014532 




TYPE 


. IDBLK 


; ;NOW TYPE THE NUMBER 


016666 


000002 000004 




MOV 


2(SP),4(SP) 


!! ADJUST THE STACK 


012616 






MOV 


(SP)*.(SP) 


000002 






RTI 


RETURN TO USER 


023420 




$OTBL : 


10000. 




001750 






1000. 






000144 






100. 






000012 






10. 






000004 




IDBLK: 


.BLKU 


4 





014652 
014656 
014660 
014664 



014542 


022737 


000176 


001040 


tCKSUR: 


CMP 


014550 


001074 








BNE 


014552 


105777 


164266 






TSTB 


014556 


100071 








BPL 


014560 


117746 


164262 






MOVB 


014564 


042716 


177600 






8IC 


014570 


022726 


000007 






CMP 


014574 


001062 








BNE 


014576 


123727 


001034 


000001 




CMPB 


014604 


001456 








BEQ 


014606 


104401 


015277 






TYPE 


014612 


104401 


015304 




$GTSUR: 


TYPE 


014616 


013746 


000176 






HOV 


014622 


104402 








TYPOC 


014624 


104401 


015315 






TYPE 


014630 


005046 






191: 


CLR 


014632 


005046 








CLR 


014634 


105777 


164204 




71: 


TSTB 


014640 


100375 








BPL 


014642 


117746 


164200 






MOVB 


014646 


042716 


177600 






BIC 



.SBTTL TTY INPUT ROUTINE 
.ENABL LSB 

♦SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 

♦ROUTINE IS ENTERED FROM THE TRAP HANDLER. AND WILL 

♦SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
♦WHEN OPERATING IN TTY FLAG MODE. 

#SWREG.SUR 5 sis THE SOFT- SWR SELECTED? 

15« ; i BRANCH IF NO 

aiTKS ; 5 CHAR THERE? 

151 ::IF NO. DON'T WAIT AROUND 

8ITKB.-(SP) ;;SAVE THE CHAR 

#tC177,(SP) ;tSTRIP-OFF THE ASCII 

#7,(SP)* ;;IS IT A CONTROL G? 

15* :;N0. RETURN TO USER 

I AUTOS. «1 siARE UE RU»K[NG IN AUTO-MOOE? 

151 5 ;BRANCK IF YES 

.$CNTLG ;!ECHO THE CONTROL-G (tG) 

.IMSUR :iTYPE CURRENT CONTENTS 

SUREG.-CSP) cSAVE SUREG FOR TYPEOUT 

(iGO TYPE—OCTAL ASCIICALL DIGITS) 

. $HNEU : (PROMPT FOR NEW SUR 

-(SP) j:CLEAR COUNTER 

-(5P) nTHENEUSUR 

SITKS iiCHAR THERE? 

1% jsIF NOT TRY AGAIN 

8ITKB,-(SP) ;;PICK UP CHAR 

#tC177.(SP) :!MAKE IT 7-BIT ASCII 



021627 
001005 
104401 
062706 



000025 

015272 
000006 



91: 



201: 



CMP 
BNE 
TYPE 
ADD 



CSP).*25 jsIS IT A CONTROL-U? 

101 s ; BRANCH IF NOT 

.♦CNTLU 8 J YES. ECHO CONTROL-U (tU) 

«6.SP : {IGNORE PREVIOUS INPUT 



C6 
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3626 

3627 

3628 

3629 

3630 

3631 

3632 

3633 

3634 

3635 

3636 

3637 

3638 

3639 

3640 

3641 

3642 

3^A3 

3644 

3645 

3646 

3647 

3648 

3649 

3650 

3651 

3652 

3653 

3654 

3655 

3656 

3657 

3658 

3659 

3660 

3661 

3662 

3663 

3664 

3665 

3666 

3667 

3668 

3669 

3670 

3671 

3672 

3673 

3674 

3675 

3676 

3677 

3678 

3679 

3680 

3681 



014670 000757 



014672 
014676 
014700 
014704 
014706 
014714 
014720 
014724 
014732 
014734 
014742 
014744 
014750 
014754 
014756 
014762 
014764 
014770 
014774 
014776 
015000 
015002 
015004 
015010 
015014 
015016 
015022 



015024 
015026 
015034 
015040 
015042 
015050 
015056 
015064 
015066 
015072 
015074 
015100 
015104 
015110 
015112 



021627 
001022 
005766 
001403 
016677 
062706 
104401 
123727 
001003 
012777 
000002 
004737 
021627 
002420 
021627 
003015 
042726 
005766 
001403 
006316 
006316 
006316 
005266 
056616 
000707 
104401 
000720 



011646 
016666 
105777 
100375 
117766 
042766 
026627 
001013 
105777 
100375 
117746 
042716 
022627 
001366 
000750 



000015 

000004 

000002 
000006 
001075 
001035 

000100 

013746 
000060 

000067 

000060 
000002 



000002 
177776 

001074 



000004 
164004 

164000 
177600 
000004 

163752 

163746 
177600 
000021 



164124 

000001 
164102 





BR 


19» 


10* : 


CnP 


CSP).#15 




BLIP 

BNE 


16» 




TCT 

TST 


4CSP J 






\ \ k 
11* 




nov 


2CSr J.SSWk 


11» : 


ADD 


#6,SP 


1 ii A . 
14? : 


T VDC 

I Trt 


. ICRLr 




LnPB 


UN I Ab , 91 




Okie 






nov 


9100(81 IKS 


Ijf : 


DTT 

Kl J. 


lol : 


(CD 


PL, » 1 irtL 




l,nr 


f CD ^ Jttif\ 




Dl T 


10* 




Lnr 


f CD ^ M."} 




Db 1 


10* 




OTP 


M^A f CD ^ ^ 




TCT 
1 b 1 


Of CO 






1 71 




ASL 


(SP) 




ASL 


(SP) 




ASL 


(SP) 


17$: 


INC 


2(SP) 




BIS 


-2(SP).CSP) 




BR 


7J 


181: 


TYPE 


.$QUES 




BR 


20« 


.OSABL 


LSB 
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s: LET'S TRY IT AGAIN 



SEQ 006 



sjIS IT A <CR>? 
:;BRANCH IF NO 
jsYES. 16 IT THE 
jjBRANCH IF YES 
nSAVE WEU SUR 
I CLEAR UP STACK 
sECHO <CR> AND 



FIRST CHAR? 



<LF> 



sRE-ENABLE TTY KBO INTERRUPTS? 
ijBRANCH IF NOT 

; {RE-ENABLE TTY KBO INTERRUPTS 
J {RETURN 
{ECHO CHAR 
;CHAR < 0? 
i BRANCH IF YES 
{{CHAR > 7? 
{BRANCH^IF YES 
{ STRIP -dFF ASCII 
{IS THIS THE FIRST CHAR 
{BRANCH IF YES 
{NO. SHIFT PRESENT 
CHAR OVER TO MAKE 
ROOM FOR NEU ONE. 
KEEP COUNT OF CHAR 
SET IN NEU CHAR 
GET THE NEXT ONE 
TYPE ?<CR><LF> 
I SIMULATE CONTROL-U 



: • *************************************************************** 

{*THIS ROUTINE UILL INPUT A SINGLE CHARACTER FROM THE TTY 
{*CALL: 

;* ROCHR {{ir#»UT A SINGLE CHARACTER FROM THE TTY 

J* RETURN HERE { {CHARACTER IS ON THE STACK 

;* {jHITH PARITY BIT STRIPPED OFF 

{ 



000002 



000004 
000004 
000023 



IROCHR: MOV (SP).-(SP) 

MOV 4(SP).2(SP) 

1$: TSTB 8$TKS 

BPL II 

MOVB a$TKB.4(SP) 

BIC #tC<177>.4(SP) 

CMP 4(SP).#23 

BNE 3$ 

21 : TSTB 9ITKS 

BPL 21 

MOVB a»TKB.-(SP) 

BIC ♦tC177.(SP) 

CMP (SP)»,#21 

BNE 21 

BR 11 



{ {PUSH DOWN THE PC 
{{SAVE THE PS 

{WAIT FOR 

{A CHARACTER 

{READ THE TTY 

{GET RID OF JUNK IF ANY 
{{IS IT A CONTRX-S? 
{{BRANCH IF NO 
;{UAIT FOR A CHARACTER 
{ {LOOP UNTIL ITS THERE 
{{GET CHARACTER 
{{MAKE IT 7-BIT ASCII 
({IS IT A CONTROL-Q? 
{{IF NOT DISCARD IT 
{{YES. RESUME 



D6 
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3682 
3683 
3684 
3685 
3686 
3687 
3688 
3689 
3690 
3691 
3692 
3693 
3694 
3695 
3696 
3697 
3698 
3699 
3700 
3701 
3702 
3703 
3704 
3705 
3706 
3707 
3708 
3709 
3710 
3711 
3712 
3713 
3714 
3715 
3716 
3717 
3718 
3719 
3720 
3721 
3722 
3723 
3724 
3725 
3726 
3727 
3728 
3729 
3730 
3731 
3732 
3733 
3734 
3735 
3736 
3737 



015114 
015122 
015124 
015132 
015134 
015142 
015144 
015152 



015154 
015156 
015162 
015166 
015170 
015172 
015174 
015200 
015202 
015206 
015210 
015214 
015220 
015224 
015226 
015232 
015236 
015240 
015242 
015250 
015256 
015260 
015261 
015262 
015272 
015277 
015304 
015312 

015315 
015322 



026627 
001744 
026627 
002407 
026627 
003003 
042766 
000002 



010346 
012703 
022703 
101405 
104410 
112613 
122713 
001003 
104401 
000763 
111337 
104401 
122723 
001356 
105063 
104401 
012603 
011646 
016666 
012766 
000002 
000 
000 
000010 
052536 
136 
005015 
020075 

040 
036440 



000004 000021 

000004 000140 

000004 000175 

000040 000004 



015262 
015272 



000177 

001074 

015260 
015260 
000015 

177777 
001076 



000004 000002 
015262 000004 



005015 000 

006507 000012 

053523 020122 
000 

047040 053505 
000040 



MACYll 30C1046) 24-MAR 86 
TTY INPUT ROUTINE 



10:44 PAGE 69 



SEQ 0068 



3$: CMP 4CSP),#»X0N j ;IS IT A RANDOM XON? ;RAN001 

BEQ 1* { (BRANCH IF YES ;RAN001 

CMP 4(SP).#140 :»IS IT UPPER CASE? 

BLT 4» s J BRANCH IF YES 

CMP 4CSP).#175 silS IT A SPECIAL CHAR? 

BGT 4$ ; J BRANCH IF YES 

BIC #40.4CSP) :;MAKE IT UPPER CASE 

4*: RTI ; :60 BACK TO USER 

♦THIS ROUTINE WILL INPUT A STRING FROM THE TTY 
♦CALL: 

* RDLIN INPUT A STRING FROM THE TTY 

* RETURN HERE ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 

* ;s TERMINATOR WILL BE A BYTE OF ALL O'S 



♦RDLIN: MOV R3.-(SP) 

1*: MOV #nTYIN.R3 

21: CMP #*TTYIN»8.,R3 

6L0S 4$ 

RDCHR 

MOVB (SP)*,(R3) 

10*: CMP6 #177. (R3) 

BNE 3« 

4$: TYPE .IQUES 

BR 1» 

31: nova (R3).9I 

TYPE .9I 

CMPB MS.CRS)* 

BNE 21 

CLRB -1(R3) 

TYPE . ILF 

HOV (SP)«.R3 

MOV (SP).-(SP) 

MOV 4(SP),2(SP) 

MOV #»TTYIN,4(SP) 
RTI 

9$: .BYTE 0 

.BYTE 0 

♦TTYIN: .BLKB 8. 

♦CNTLU: .ASCIZ /tU/<15><12> 

$CNTLG: .ASCIZ /t6/<15><12> 

IMSUR: .ASCIZ <15><12>/SUR « 



IMNEU: .ASCIZ / NEW - / 



iSAVE R3 
(GET ADDRESS 
J BUFFER FULL? 
J BR IF YES 

;G0 READ ONE CHARACTER FROM THE TTY 

5 GET CHARACTER 
;{IS IT A RU80UT 
{{SKIP IF NOT 
{{TYPE A '?• 

{{CLEAR THE BUFFER AM) LOOP 
{{ECHO THE CHARACTER 

{ (CHECK FOR RETURN 
{ (LOOP IF NOT RETURN 

{CLEAR RETURN (THE 15) 

{TYPE A LINE FEED 

{RESTORE R3 
{{ADJUST THE STACK AND PUT ADDRESS OF THE 
{ { FIRST ASCII CHARACTER ON IT 



RETURN 

STORAGE FOR ASCII CHAR. TO TYPE 
TERMINATOR 

RESERVE 8 BYTES FOR TTY INPUT 
CONTRa "U" 
CONTRX "G" 



.SBTTL TRAP DECODER 

{♦THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE "TRAP" INSTRUCTION 
{♦AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
{♦OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 



E6 
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3738 








3739 








3740 


015326 


010046 




3741 


015330 


016600 


000002 


3742 


015334 


005740 




3743 


015336 


111000 




3744 


015340 


006300 




3745 


015342 


016000 


015362 


3746 


015346 


000200 




3747 








3748 








3749 








3750 








3751 


015350 


011646 




3752 


015352 


016666 


000004 


3753 


015360 


000002 




3754 








3755 








3756 








3757 








3758 








3759 








3760 








3761 








3762 


015362 


015350 




3763 


015364 


013534 




3764 


015366 


014114 




3765 


015370 


014070 




3766 


015372 


014130 




3767 


015374 


014316 




3768 








3769 


015376 


014612 




3770 








3771 


015400 


014542 




3772 


015402 


015024 




3773 


015404 


015154 




3774 








3775 








3776 








3777 








3778 








3779 








3780 








3781 








3782 


015406 


012737 


000176 


3783 


015414 


012737 


000174 


3784 


015422 


032777 


000020 


1785 


015430 


001403 




3786 


015432 


012703 


002750 


3787 


015436 


000402 




3788 


015440 


012703 


002760 


3789 


015444 


000005 




3790 


015446 


112773 


000052 


3791 


015454 


105773 


000000 


3792 


01b460 


100375 




3793 


015462 


117373 


000002 
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TRAP DECODER 

;*G0 TO THAT ROUTINE. 



SEQ ooe 



$TRAP: MOV 


RO.-(SP) 




SAVE RO 


MOV 


2(SP).R0 


« 


GET TRAP ADDRESS 


TST 


-(RO) 


• 


BACKUP BY 2 


MOVB 


(RO).RO 


! 


GET RIGHT BYTE OF TRAP 


ASL 


RO 


■ 


POSITION FOR INDEXING 


MOV 


$TRPA0(R0).R0 


• 


INDEX TO TABLE 


RTS 


RO 


S 


GO TO ROUTINE 



;5THIS IS USE TO HANDLE THE "GETPRI" MACRO 



$TRAP2: 



MOV 
MOV 
RTI 



(SP),-(SP) 
4(SP).2(SP) 



J ; MOVE THE PC DOWN 
; iMOVE THE PSU DOUN 
S! RESTORE THE PSU 



.SBTTL TRAP TABLE 



;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
;*BY THE "TRAP" INSTRUCTION. 



$TRPAD: 



ROUTINE 

"word" 

♦TYPE 

$TYPOC 

♦TYPOS 

♦TYPON 

♦TYPDS 



♦TRAP2 
; CALL-TYPE 
iCALL-TYPOC 
J CALL-TYPOS 
sCALL-TYPON 
: CALL-TYPOS 



TRAP* 1(104401) 
TRAP*2( 104402) 
TRAP« 3(104403) 
TRAP«4( 104404) 
TRAP»5( 104405) 



TTY TYPEOUT ROUTINE 

TYPE OCTAL NUfBER (WITH LEADING ZEROS) 
TYPE OCTAL NUr«ER (NO LEADING ZEROS) 
TYPE OCTAL NUWER (AS PER LAST CALL) 
TYPE DECIMAL NUTQER (WITH SIGN) 



♦GTSUR ;;CALL-GTSUR TRAP»6( 104406) GET SOFT-SUR SETTING 



♦CKSWR ;;CALL-CKSUR 
)RDCHR t sCALL-RDCHR 
$ROLIN :!CALL-ROLIN 



TRAP»7( 104407) TEST FOR CHANGE IN SOFT-SUR 
TRAP«10( 104410) TTY TYPEIN CHARACTER ROUTIfC 
TRAP^IK 104411) TTY TYPEIN STRING ROUTINE 



.S8TTL ECHO TEST 

!*THIS ROUTINE UILL ECHO ANY CHARACTER TYPED 

;*0N EITHER SLUl OR SLU2. DEFAULT IS TO THE CONSOLE DEVICE SLUl. 
j*THE TEST IS HALTED BY TYPING A CONTROL -C 
:*TEST CAN BE RESTARTED AFTER HALTING BY JUST CONTINUING 



001040 
001042 
163410 



000006 
000006 



ECHO: 



1»: 
2»: 

3»: 



MOV «SUREG.SUR 

MOV #DISPREG. DISPLAY 

BIT «BIT4, aSUR 

BEQ II 

MOV #RCSR, R3 

BR 21 

MOV «CRCSR. R3 
RESET 

MOVB «'*.a6(R3) 

TSTB 8(R3) 

6PL 3> 

MOVB a2(R3).S6(R3) 



I SET UP FOR SOFTUARE SUITCH REGISTER 
jAND DISPLAY REGISTER 
; CHECK IF BIT4 SET IN SUITCH REG 
;IF NOT THEN SELECT SLUl 
sIF BIT4 SET THEN SELECT SLU2 

! SELECT SLUl (THIS IS DEFAULT DEVICE) 
J CLEAR EVERYTHING 
8 TRANSMIT PROMPT "*» 
jUAIT FOR INPUT 

J ECHO INPUT 



F6 
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SEQ 0070 



3794 


015470 


017300 


000002 






hOV 


82(R3).R0 


STORE INPUT 


3795 


015474 


100023 








BPL 


6$ 


BR IF "ERROR "NOT SET 


3796 


015476 


052701 


010000 






BIS 


#6IT12,R1 


SET PARITY ERROR TEST MASK 


3797 


015502 


030100 








BIT 


Rl.RO 


CHECK FOR PARITY ERROR FLAG 


3798 


015504 


001403 








BEQ 


4$ 


,BR IF NOT SET 


3799 


015506 


004737 


015570 






JSR 


PC. MSG 


i REPORT PARITY ERROR 


3800 


015512 


015616 








MPAR 






3801 


015514 


006301 






4$: 


ASL 


Rl 


SHIFT MASK TO TEST "FR" FLAG 


3602 


015516 


030100 








BIT 


Rl.RO 


TEST FOR FRAMING ERROR FLAG 


3803 


015520 


001403 








BEQ 


5* 


iBR IF NOT SET 


3804 


015522 


004737 


015570 






JSR 


PC. MSG 


iREPSORT FRAMING ERROR 


3805 


015526 


015627 








MFR 




3806 


015530 


006301 






5$: 


ASL 


Rl 


i SHIFT MASK TO TEST "OR" FLAG 


3807 


015532 


030100 








BIT 


Rl.RO 


;TEST FOR OVERFLOU ERROR 


3808 


015534 


001403 








BEQ 


61 


:BR IF NOT SET 


3809 


015536 


004737 


015570 






JSR 


PC. MSG 


{REPORT OVERFLOU ERROR 


3810 


015542 


015641 








MOR 




3811 


015544 


042700 


000200 




61: 


BIC 


#6IT7.RC 


i CLEAR ANY PARITY BIT 


3812 


015550 


022700 


000003 






CMP 


»3.R0 


;UAS INPUT CONTROL -C 


3813 


015554 


001337 








BNE 


3$ 


:BR IF IS NOT 


3814 


015556 


004737 


015570 






JSR 


PC, MSG 


: REPORT PROGRAM STOP 


3815 


015562 


015654 








MSTOP 




3816 


015564 


000000 








HALT 




sEND OF TEST HALT 


3817 


015566 


000707 








BR 


ECHO 


; AFTER END OF TEST WLT 


3818 
















; PRESS CONTINUE TO RESTART ECHO 


3819 


















3820 


015570 


013600 






MSG: 


MOV 


a(SP)*,RO 
#2.-(SP) 


jPICK UP MESSAGE POINTER 


3821 


015572 


062746 


000002 






ADO 


! ADJUST RETURN PC 


3822 


015576 


105773 


000004 




UAIT: 


TSTB 


84(R3) 


sUAIT FOR XMIT DONE 


3823 


015602 


100375 








BPL 


UAIT 




3824 


015604 


112073 


000006 






MOVB 


(R0}«.a6CR3} 


:SEND CHARACTER 


3825 


015610 


105710 








TSTB 


(RO) 


;I5 THIS END OF MESSAGE? 


3826 


015612 


001371 








SHE 


UAIT 


:BR IF NOT 


3827 


015614 


000207 








RTS 


PC 


: RETURN 


3828 


















3829 


015616 


005015 


040520 


044522 


MPAR: 


.ASCIZ 


<CR><LF>/PARITY/ 




3830 


015624 


054524 


000 












3831 


















3832 


015627 


015 


043012 


040522 


.-FR: 


.ASCIZ 


<CR><LF>/FRAMING/ 


3833 


015634 


044515 


043516 


000 










3834 


















3835 


015641 


015 


047412 


042520 


nOR: 


.ASCIZ 


<CR><LF>/OVERFLOU/ 


3836 


015646 


043122 


047514 


0001.-^7 










3837 


















3838 


015654 


OOSOIS 


052123 


050117 


MSTOP: 


.ASCIZ 


<CR><LF>/STOP/ 




3839 


015662 


000 














3840 


















3841 


















3842 


















3843 




015664 








.EVEN 






3844 
















3845 










.SBTTL 


TERMINAL OUTPUT TEST 




3846 


















3847 












3848 












:*THIS ROUTINE WILL OUTPUT ALL URITABLE CHARACTERS FOR THE 


3849 












!*THE OCTAL CODE 040 --> 


377 



G6 
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3850 
3851 
3852 
3853 
3854 

3855 015664 

3856 015672 

3857 015700 

3858 015706 

3859 015710 

3860 015714 

3861 015716 

3862 015722 

3863 015724 

3864 015730 

3865 015734 

3866 015740 

3867 015742 

3868 015746 

3869 015750 

3870 015752 

3871 015754 
3872 

3873 015760 

3874 015762 

3875 015766 

3876 015770 

3877 015774 

3878 015776 
3879 

3880 016000 

3881 016004 

3882 016006 
3883 

3884 

3885 016010 

3886 016016 

3887 016024 

3888 016032 

3889 016040 

3890 016046 
3891 

3892 
3893 
3894 
3895 

38% 016052 

3897 016060 

3898 016066 

3899 016074 

3900 016102 

3901 016110 
3902 

3903 
3904 
3905 
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TERMINAL OUTPUT TEST 

s*32 CHARACTERS ARE PRINTED ON EACH LINE 
:«THE PATTERN IS REPEATED EVE.<Y THREE LINES 

; * 



SEQ 0071 



012737 


000176 


>\ A « AAA 

001040 


OUTTST : 


MOV 


OSUREG , SUR 


iSET UP FOR SOrTWARt SWITCH RtGISTER 


012737 


000174 


A A « AAA 

001042 




MOV 


ffOISPREG , DISPLAY 


J AND DISPLAY REGISTER 


032777 


000020 


163132 




BIT 


«eiT4. SSUR 


; CHECK IF BIT4 SET IN SWITCH REG 


001403 




BEQ 


1$ 


;IF NOT THEN SELECT SLUl 


012703 


002750 






MOV 


imCSR, R3 


;lr oil 4 5E1 IMtN 5ELELI bL\j2 


AAA M A ^\ 

000402 








BR 




CCI Cf*T CI 111 TTUTC TC nCCAII T nCUTPC ^ 

;bELELI ?LU1 I IHIb lb DtrHlK.1 UtVILtJ 


012703 


002760 




If : 


MOV 


vCRCSRi Ro 


000005 






2* : 


RESET 


.CI CAD TUC LmOl F\ 


012701 


000040 




ii : 


MUV 


1r*0,Hl 


.1 nan ctdct udttapi c ruAOArTPO 


012700 


000040 




4$: 


MOV 


#40. RO 


iLOAD CHAR COUNT PER LINE 


105773 


000004 




5$: 


TSTB 


84(R3) 


;UAIT FOR DONE 


1003/5 








ODI 






010173 


000006 






MOll 

HOV 




. TOAMCMTT A rUADATTCD 














•TNCRFMENT CHARACTER CODE 


005300 








DEC 


RO 


J DECREMENT CHAR COUNT 


001370 








BNE 


5t 


:BR IF LINE NOT COMPLETE 


004737 


015570 






JSP 


PC. MSG 


;SSUE CR.LINE FEED 


001075 








♦CRLF 






105773 


000000 






TSTB 


9(R3) 


{ANY CHARACTER RECEIVED? 


100404 








BMI 


6« 


:BR IF YES 


032701 


000200 






BIT 


WIT7.R1 


{FINISHED ONE PASS OF WRITABLE CHARACTERS? 


001353 








BNE 


3« 


:BR IF YES 


000754 








BR 


4$ 


;IF NOT WRITE NEXT LINE 


005073 


000002 






CLR 


a2(R3) 


{CLEAR RECEIVER 


000000 








HALT 




{STOP TEST 


000726 








BR 


OUTTST 


{RESTART TEST IF CONTINUED 



046123 
051503 
042516 
051440 
052111 
042523 



046123 
051503 
020104 
042522 
051440 
000 



030525 
020122 
047040 
052105 
020110 
000124 



030525 
020122 
047516 
052524 
054523 



052040 
047504 
052117 
053440 
042522 



EMS: 



.ASCIZ /SLUl TCSR TONE NOT SET WITH RESET/ 



051040 
044504 
020124 
047122 
041516 



EM6: 



.ASCIZ /SLUl RCSR DID NOT RETURN SSYNC/ 



H6 
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TERMINAL OUTPUT TEST 



SEO 007^ 



3906 










3907 


016111 


123 


052514 


020061 


3908 


016116 


041122 


043125 


042040 


3909 


016124 


042111 


047040 


052117 


3910 


016132 


051040 


052105 


0'::x25 


3911 


016140 


020116 


051523 


047131 


3912 


016146 


000103 






3913 










3914 










3915 










3916 










3917 










3918 


016150 


040503 


020116 


047516 


3919 


016156 


020124 


042523 


020124 


3920 


016164 


044502 


031124 


047440 


3921 


016172 


020106 


046123 


030525 


3922 


016200 


052040 


051503 


000122 


3923 










3924 










3925 










3926 










3927 


016206 


042522 


042523 


020124 


3928 


016214 


044504 


020104 


047516 


3929 


016222 


020124 


046103 


040505 


3930 


016230 


020122 


044502 


031124 


3931 


016236 


047440 


020106 


046123 


3932 


016244 


030525 


052040 


051503 


3933 


016252 


000122 






3934 










3935 










3936 










3937 










3938 










3939 










3940 


016254 


044502 


033124 


047440 


3941 


016262 


020106 


046123 


030525 


3942 


016270 


052040 


051503 


020122 


3943 


016276 


047516 


020124 


046103 


3944 


016304 


040505 


020122 


043101 


3945 


016312 


042524 


020122 


042522 


3946 


016320 


042523 


000124 




3947 










3948 










3949 










3950 










3951 










3952 










3953 


016324 


046123 


030525 


054040 


3954 


016332 


044515 


020124 


047111 


3955 


016340 


042524 


051122 


050125 


3956 


016346 


042524 


020104 


044527 


3957 


016354 


044124 


050040 


044522 


3958 


016362 


051117 


052111 


020131 


3959 


016370 


000067 






3960 










3961 











EM7: 



.ASCIZ /SLUl RBUF DID NOT RETURN SSYNC/ 



EMll: 



EM13: 



EM15: 



.ASCIZ /CAN NOT SET BIT2 OF SLUl TCSR/ 



.ASCIZ /RESET 010 NOT CLEAR BIT2 OF SLUl TCSR/ 



EMM: .ASCIZ /BIT6 OF SLUl TCSR NOT aEAR AFTER RESET/ 



.ASCIZ /SLUl XMIT INTERRUPTED WITH PRIORITY 7/ 



16 



CJKOIBO 11/238 SLU LTC REPR DIAG 
JKOIBO.Pll 24-MAR-86 09:57 



3962 










3963 










3964 










3965 










3966 


016372 


040503 


020116 


047516 


3967 


016400 


020124 


042523 


020124 


3968 


016406 


044502 


033124 


047440 


3%9 


016414 


020106 


046123 


030525 


3970 


016422 


052040 


051503 


000122 


3971 










3972 










3973 










3974 










3975 


016430 


040503 


020116 


047516 


3976 


016436 


020124 


046103 


040505 


3977 


016444 


020122 


044502 


033124 


3978 


016452 


047440 


020106 


046123 


3979 


016460 


030525 


052040 


051503 


3980 


016466 


000122 






3981 










3982 










3983 










3984 










3985 










3986 


016470 


042522 


042523 


020124 


3987 


01647^ 


044504 


020104 


047516 


3988 


0165C f 


020124 


046103 


040505 


3989 


016512 


020122 


044502 


033124 


3990 


016520 


047440 


020106 


046123 


3991 


016526 


030525 


052040 


051503 


3992 


016534 


000122 






3993 










3994 










3995 










3996 










3997 










3998 










3999 


016536 


044502 


033124 


047440 


4000 


016544 


020106 


046123 


030525 


4001 


016552 


051040 


051503 


020122 


4002 


016560 


047516 


020124 


046103 


4003 


016566 


040505 


020122 


043101 


4004 


016574 


042524 


020122 


042522 


4005 


016602 


042523 


000124 




4006 










4007 










4008 










4009 










4010 










4011 










4012 


016606 


046123 


030525 


051040 


4013 


016614 


053103 


020122 


047111 


4014 


016622 


042524 


051122 


050125 


4015 


016630 


020124 


044527 


044124 


4016 


016636 


050040 


044522 


051117 


4017 


016644 


052111 


020131 


000067 



MACYll 30(1046) 24 MAR -86 10:44 PAGE 74 
TERMINAL OUTPUT TEST 



EM16: .ASCIZ /CAN NOT SET BIT6 OF SLUl TCSR/ 



SEO 007 



EM17: .ASCIZ /CAN NOT CLEAR BIT6 OF SLUl TCSR/ 



EM20: .ASCIZ /RESET DID NOT CLEAR BIT6 OF SLUl TCSR/ 



EM21: .ASCIZ /BIT6 OF SLUl RCSR NOT CLEAR AFTER RESET/ 



EM22: .ASCIZ /SLUl RCVR INTERRUPT WITH PRIORITY 7/ 



J6 



CJKDIBO 11/238 SLU LTC REPR OIAG 
JK0I80.P11 24-MAR-86 09; 57 
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TERMINAL OUTPUT TEST 



SEO 0074 























Anon 
































01 MSP 






nA7Si ft 

VH 1 JXD 


AnOA 




MM OA 










044S02 
V^rH JVC 




yjf 1 H*»v 






0901 f>A 




wow JC- 


40?7 




051040 


0S1S03 


0001 p J 






















4030 










4031 










4032 


016710 


040S0^ 


0201 16 




4033 


016716 


020124 

VbVXC~ 


046103 


04050S 


4034 




020122 

vc vxcc 


044S02 


033124 


4035 


016732 


047440 


020106 




4036 


016740 


030S25 


051040 


051503 


4037 


016746 


000122 






4038 










4039 










4040 










4041 










404? 










4043 


016750 


040503 


020116 

Vb vxxw 


047516 

V^ 1 ^xv 


4044 


016756 


020124 


046103 

V^UXV^ 


040505 

VTV^/V J 


4045 


016764 


020122 

Vb VXbb 


044502 


033124 


4046 


016772 


047440 


020106 

VfcVX w 


046123 


4047 


017000 

WX f wv 


030525 


051040 

V JA v"rv 


V^X.A/-J 


4048 


017006 

VX f vw 


vcvxcc 


V^^ » 


0441 Pd 


4049 


017014 


051040 


051505 

V^XvfV^ 


052105 

V^CX V^ 


4050 


017022 

VX ■ VSib 


000 

WV 






4051 










4052 










4053 




















4055 










4056 










4057 










405S 


017023 

VX ■ WC ^ 


123 


052S14 


0PD061 


4059 


017030 

VX ■ v«/v 


04PSPP 


042503 


vj^xxx 


4060 


017036 

VX > V«^0 


vJXXvJ 


04204o 


0471 1 7 


4061 


017044 

VX ■ V T * 


vcvxv^ 


042516 


04PSP6 


4062 


017052 

VX r v^c 


020122 

vc vxcc 




0001 P4 


4063 










4064 










4065 










4066 










4067 


017060 


042522 


042523 


020124 


4068 


017066 


044504 


020104 


047516 


4069 


017074 


020124 


0461C3 


040505 


4070 


017102 


020122 


046123 


030525 


4071 


017110 


051040 


053103 


020122 


4072 


017116 


047504 


042516 


000 


4073 







.ASCIZ /CAN NOT SET BIT6 OF SLUl RCSR/ 



.ASCIZ /CAN NOT CLEAR BIT6 OF SLUl RCSR/ 



.ASCIZ /CAN NOT CLEAR BIT6 OF SLUl RCSR WITH RESET/ 



.ASCIZ /SLUl RECEIVER DONE NEVER SET/ 



.ASCIZ /RESET 010 NOT CLEAR SLUl RCVR DONE/ 



I<6 
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TERMINAL OUTPUT TEST 



10:44 PAGE 76 



SEQ 0075 



4074 










4075 










4076 










4077 










4078 


017123 


122 


040505 


044504 


4079 


017130 


043516 


051440 


052514 


4080 


017136 


020061 


041122 


043125 


4081 


017144 


042040 


042111 


047040 


4082 


017152 


052117 


041440 


042514 


4083 


017160 


051101 


051040 


053103 


4084 


017166 


020122 


047504 


042516 


4085 


017174 


000 






4086 










4087 










4088 










4089 










4090 










4091 










4092 










4093 


017175 


123 


052514 


020062 


4094 


017202 


041524 


051123 


042040 


409*5 


017210 


042111 


047040 


052117 


4096 


017216 


051040 


052105 


051125 


4097 


017224 


020116 


051523 


047131 


4098 


017232 


000103 






4099 










4100 










4101 










4102 










4103 










4104 


017234 


046123 


031125 


052040 


4105 


017242 


052502 


020106 


044504 


4106 


017250 


020104 


047516 


020124 


4107 


017256 


042522 


052524 


047122 


4108 


017264 


051440 


054523 


041516 


4109 


017272 


000 






4110 










4111 










4112 










4113 










4114 










4115 


017273 


123 


052514 


020062 


4116 


017300 


041524 


051123 


042040 


4117 


017306 


047117 


020105 


047516 


4118 


017314 


020124 


046103 


040505 


4119 


017322 


042522 


020104 


044527 


4120 


017330 


044124 


052040 


052502 


4121 


017336 


020106 


052506 


046114 


4122 


017344 


000 






4123 










4124 










4125 










4126 










4127 










4128 










4129 











.ASCIZ /READING SLUl RBUF DID NOT CLEAR RCVR DONE/ 



.ASCIZ /SLU2 TCSR DID NOT RETURN SSYNC/ 



.ASCIZ /SLU2 TBUF DID NOT RETURN SSYNC/ 



.ASCIZ /SLU2 TCSR DONE NOT CLEARED UITH TBUF FULL/ 



L6 



CJKDIBO 


11/238 


SLU LTC 


REPR OIAG 


JKDIBO 


Pll 24-MAR-86 


09:57 




4130 


017345 


123 


052514 


020062 


4131 


017352 


041524 


051123 


042040 


4132 


017360 


047117 


020105 


047516 


4133 


017366 


020124 


042523 


020124 


4134 


017374 


043101 


042524 


020122 


4135 


017402 


051124 


047101 


046523 


4136 


017410 


052111 


000 




4137 










4138 










4139 










4140 










4141 










4142 










4143 


017413 


123 


052514 


020062 


4144 


017420 


041524 


051123 


042040 


4145 


017426 


^44^ 

047117 


020105 


047516 


4146 


017434 


020124 


042523 


020124 


4147 


017442 


044527 


044124 


051040 


4148 


017450 


AC 4 CMC 

051505 


052105 


000 


4149 










4150 










4151 










4152 










4153 










4154 


01 7455 


123 


052514 


020062 


4155 


017462 


Ail 4 

041522 


051123 


042040 


4156 


A1 

017470 


A^ ^444 

042111 


047040 


052117 


4157 


017476 


AC1 Ail A 

051040 


052105 


051125 


4158 


A1 ^CA^ 

017504 


020116 


051523 


047131 


4159 


A1 O 

017512 


AAA1 AT 

000103 






4160 










4161 










4162 










4163 










4164 










4165 


017514 


A4 £ 4 ^9 

046123 


031125 


051040 


4166 


017522 


052502 


020106 


044504 


4167 


0175o0 


A^A4 A M 

020104 


047516 


020124 


4168 


017536 


Ail ^CO^ 

042522 


052524 


047122 


4169 


A4 ^CAA 

017544 


AC 4 d A A 

051440 


054523 


041516 


4170 


A 4 

017552 


AAA 

000 






4171 










4172 










4173 










4174 










4175 










4176 


017553 


102 


052111 


020060 


4177 


01 r5o0 


043117 


051440 


052514 


4178 


017566 


020062 


041524 


051123 


4179 


017574 


047040 


052117 


041440 


4180 


017602 


042514 


051101 


040440 


4181 


017610 


052106 


051105 


051040 


4182 


017616 


051505 


052105 


000 


4183 










4184 










4185 











MACYll 30(1046) 24 -MAR 86 
TERMINAL OUTPUT TEST 



EM34: 



EM35: 



eM36: 



EM37: 



10:44 PAGE 77 
ASCI7 /SLU2 TCSR DONE NOT SET AFTER TRANSMIT/ 



SEQ 0076 



.ASCIZ /SLU2 TCSR DONE NOT SET UITH RESET/ 



.ASCIZ /SLU2 RCSR DID NOT RETURN SSYNC/ 



.ASCIZ /SLU2 RBUF DID NOT RETURN SSYNC/ 



EM40: .ASCIZ /BITO OF SLU2 TCSR NOT aEAR AFTER RESET/ 



M6 



CJKDIBO 11/238 SLU LTC REPR DIAG 
JKDIBO.Pll 24 MAR-86 09:57 



4186 










4187 










4188 










4189 


017623 


103 


047101 


047040 


4190 


017630 


052117 


051440 


052105 


4191 


017636 


041040 


052111 


020060 


4192 


017644 


043117 


051440 


052514 


4193 


017652 


020062 


041524 


051123 


4194 


017660 


000 






4195 










4196 










4197 










4198 










4199 










4200 


017661 


103 


047101 


047040 


4201 


017666 


052117 


041440 


042514 


4202 


017674 


051101 


041040 


052111 


4203 


017702 


020060 


043117 


051440 


4204 


017710 


052514 


020062 


041524 


4205 


017716 


051123 


000 




4206 










4207 










4206 










4209 










4210 










4211 


017721 


122 


051505 


052105 


4212 


017726 


c 12040 


042111 


047040 


4213 


017734 


052117 


041440 


042514 


4214 


017742 


051101 


041040 


052111 


4215 


017750 


020060 


043117 


051440 


4216 


017756 


052514 


020062 


041524 


4217 


017764 


051123 


000 




4218 










4219 










4220 










4221 










4222 










4223 










4224 


017767 


102 


052111 


020066 


4225 


017774 


043117 


051440 


052514 


4226 


020002 


020062 


041524 


051123 


4227 


020010 


047040 


052117 


041440 


4228 


020016 


042514 


051101 


040440 


4229 


020024 


052106 


051105 


051040 


4230 


020032 


051505 


052105 


000 


4231 










4232 










4233 










4234 










4235 










4236 










4237 


020037 


123 


052514 


020062 


4236 


020044 


046530 


052111 


044440 


4239 


020052 


052116 


051105 


052522 


4240 


020060 


052120 


042105 


053440 


4241 


020066 


052111 


020110 


051120 



MACYll 30(1046) 24-MAR-86 10:44 PAGE 78 
TERMINAL OUTPUT TEST 

EM41: .ASCIZ /CAN NOT SET BITO OF sLU2 TCSR/ 
EM42: .ASCIZ /CAN NOT CLEAR BITO OF SLU2 TCSR/ 
EM43: .ASCIZ /RESET DID NOT CLEAR BITO OF SLU2 TCSR/ 

Em4: .ASCIZ /BIT6 OF SLU2 TCSR NOT CLEAR AFTER RESET/ 

EM45: .ASCIZ /SLU2 XMIT INTERRUPTED WITH PRIORITY 7/ 



N6 
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TERMINAL OUTPUT TEST 



10:44 PAGE 79 



AOAO 








n^s?A 


AOAX 








































APA7 






























42^ 


020105 


103 


047101 


047040 




vC 


052117 


051440 


052105 

V^fc X VW 




020120 

Vfc VAbV 


041040 


052111 


020066 

Wfc WWW 




020126 


043117 


051440 


052514 

W^b WX^ 


4254 


020134 


020062 


041524 

V^X 


051123 


4255 


020142 


000 






4256 










4257 










4258 










4259 










4260 










4261 


C20143 


103 


047101 


047040 


4262 


020150 


052117 


041440 


042514 


4263 


020156 


051101 


041040 


052111 


4264 


020164 


020066 


043117 


051440 


4265 


020172 


052514 


020062 


041524 


4266 


020200 


051123 


000 




4267 










4268 










4269 










4270 










4271 










4272 


020203 


122 


051505 


052105 


4273 


020210 


042040 


042111 


047040 


4274 


020216 


052117 


041440 


042514 


4275 


020224 


051101 


041040 


052111 


4276 


020232 


020066 


043117 


051440 


4277 


020240 


052514 


020062 


041524 


4278 


020246 


051123 


000 




4279 










4280 










4281 










4282 










4283 










4284 










4285 


020251 




052111 


020066 


4286 




043117 


051440 


05PS14 


4287 


0P0P64 


vcwwc 




051 1P3 


4288 


020272 


047040 


052117 


041440 


4289 


020300 


042514 


051101 


040440 


4290 


020306 


0S2106 


051105 


051040 


4291 


020314 


051505 


052105 


000 


4292 










4293 










4294 










4295 










4296 










4297 











.ASCIZ /CAN NOT SET BIT6 OF SLU2 TCSR/ 



.ASCIZ /CAN NOT CLEAR BIT6 OF SLU2 TCSR/ 



, ASCIZ /RESET 010 NOT CLEAR BIT6 OF SLU2 TCSR/ 



.ASCIZ /BIT6 OF SLU2 RCSR NOT CLEAR AFTER RESET/ 



B7 
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JKDIBO.Pll 24-ttAR.86 09:57 



MACYll 30(1046) 24 MAR-86 
TERMINAL OUTPUT TEST 



10:44 PAGE 80 



SfO 007^^ 



4298 
4299 
4300 
4301 
4302 
4303 
4304 
4305 
f 4306 
4307 
4306 
4309 
4310 
4311 
4312 
4313 
4314 
4315 
4316 
4317 
4318 
4319 
4320 
4321 
4322 
4323 
4324 
4325 
4326 
4327 
4328 
4329 
4330 
4331 
4332 
4333 
4334 
4335 
4336 
4337 
4338 
4339 
4340 
4341 
4342 
4343 
4344 
4345 
4346 
4347 
4348 
4349 
4350 
4351 
4352 
4353 



020321 
020326 
020334 
020342 
020350 
020356 
020364 



123 
041522 
052116 
052120 
020110 
044522 

000 



052514 0<?0062 EM52: 

051126 044440 

051105 052522 

053440 052111 

051120 047511 

054524 033440 



020365 
020372 
020400 
020406 
020414 
020422 



0204.?3 
020430 
020436 
020444 
020452 
020460 



020463 
020^70 
020476 
020504 
020512 
020520 
020526 
020534 



103 
052117 
041^^40 
043117 
020062 

000 



103 
052117 
051101 
020066 
052514 
051123 



103 
052117 
051101 
020066 
052514 
051123 
020110 
000124 



047101 047040 E^B3: 

051440 052105 

052111 020066 

051440 052514 

041522 051123 



047101 047040 Eri54: 

041W 042514 

041040 052111 

043117 051440 

020062 041522 
000 



047101 047040 EM55: 

041440 042514 

041040 052111 

043117 051440 

020062 041522 

053440 052111 

042522 042523 



020536 
020544 
020552 
020560 
020566 



046123 
041505 
020122 
047040 
051440 



031125 051040 EM56: 

044505 042526 

047504 042516 

053105 051105 
05ri05 000 



.ASCIZ /SLU2 RCVR INTERRUPT WITH PRIORITY 7/ 



.ASCIZ /CAN NOT SET BIT6 OF SLU2 RCSR/ 



.ASCIZ /CAN NOT CLEAR BIT6 OF SLU2 RCSR/ 



.ASCIZ /CAN NOT CLEAR BIT6 OF SLU2 RCSR WITH RESET/ 



.ASCIZ /SLU2 RECEIVER DONE NEVER SET/ 



C7 



CJKOIBO 11/23B SLU LTC REPR OIAG 
JKOIBO.Pll 24-MAR-86 09:57 



4354 










4355 










4356 










4357 


020573 


122 


051505 


052105 


4358 


020600 


042040 


042111 


047040 


4359 


020606 


052117 


041440 


^C4 A 

042514 


4360 


020614 


051101 


051440 


052514 


4361 


020622 


020062 


041522 


f\C 4 4 

051126 


4362 


020630 


042040 


047117 


AAA 4 AC 

000105 


4363 










A T£ A 

4364 










4565 










4366 










A T£.1 










436o 


020636 


Ail ^C*^^ 

042522 


AilOl A1 

042101 


Ail^l 4 1 

047111 


456y 


u<;uo44 


A^AI A7 

020107 


046123 


AT 1 1 OC 

031125 


43 f U 




AQ1 AjIA 

051O40 


052502 


AOA1 A^ 

020106 






044504 


AOA1 f\A 

020104 


04 r516 


43 


A^A£££ 

020666 


AOA1 '^A 

020124 


Ail£ 1 AT 

046103 


AAACAC 

040505 


43 f 3 


UcUd f4 


AOA1 

020122 


f\A 4 coo 

041522 


AQ1 S 0£. 

051126 


43 i4 




042040 


AA71 1 7 

04 f 11 1 


AAA1 AC 

000105 


43 f J 










43 f O 










43 » * 










43 f 0 










43 f 7 










4380 










4301 


AOA71 A 
OcO r lO 


045514 


AOA1 OT 
020123 


AJIilCAil 

044504 


43o«; 


AOA7 1 il 

UeO r Id 


AOA1 A^ 

02O1O4 


04 f 516 


AOA1 Oil 

020124 


4303 


AOA70A 
Ucw 'c4 


AAOeoo 
042jec 


052324 


04rl22 


4304 


AOA7TO 

ye0f32 


AQ1 AAt\ 

051440 


054523 


AA1 CI & 

041516 


4303 


rtOA7AA 


AAA 

OOO 






4oeo 










430 r 










43Bo 










43o9 










4390 


020741 


1 AO 

102 


052111 




43^1 


020746 


Ail T 1 1 7 

04311 1 


046040 


AC 4 C 4 T 

051513 


43Tfe 


AOA7^A 
y2Uf34 


04 f O40 


05211 1 


f\A 4 il^A 

041440 


4373 


020 r02 


042514 


AC1 1 A1 

051101 


040440 


ATQA 
43^»4 


AOA77A 

020 r fO 


AC01 A£ 

052106 


AC1 1 AC 

051105 


AC 1 AAA 

051040 


437D 


OeOr ro 


ACI CAC 

051505 


AC0 1 AC 

052105 


AAA 

000 


43^»D 










4397 










4398 










4399 










AA/V\ 

4400 










4401 


021003 


114 


051513 


044440 


4402 


021010 


052116 


051105 


052522 


4403 


021016 


052120 


053440 


052111 


4404 


021024 


020110 


051120 


047511 


4405 


021032 


044522 


054524 


033440 


4406 


021040 


000 






4407 










4408 










4409 
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TERMINAL OUTPUT TEST 



.ASCIZ /RESET DID NOT CLEAR SLU2 RCVR DONE/ 



SEO 0080 



.ASCIZ /READING SLU2 RBUF DID NOT CLEAR RCVR DONE/ 



.ASCIZ /LKS DID NOT RETURN SSYNC/ 



.ASCIZ /BIT6 OF LKS NOT CLEAR AFTER RESET/ 



.ASCIZ /LKS INTERRUPT WITH PRIORITY 7/ 



D7 
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n^? 117 








n9in^4 












04^1 17 




OSISI^ 




AO 1070 


000 






AAM 










441A 






























44P1 


021071 


103 


O47101 

/ X vX 


047040 




02107ft 


0S21 17 


041440 


042S14 

VtC JX^ 


4423 


021104 


051101 


041040 


052111 

V^bXXX 


4424 




020066 


043117 


046040 


4423 


021120 


051513 


000 




44P6 










4427 










44PA 










4429 










4430 


021123 


122 


051505 


052105 


4431 


021130 


042040 


042111 


047040 


4432 


021136 


052117 


041440 


042514 


4433 


021144 


051101 


041040 


052111 


4434 


021152 


020066 


043117 


046040 


4435 


021160 


051513 


000 




4436 










4437 










4436 










4439 










4440 










4441 


021163 


10? 
xvc 


0521 1 1 

VJCXXX 


020067 


4442 


021170 


043117 


046040 


051513 


4443 


021176 


047040 


052117 


051440 


4444 


021204 


052105 


040440 


052106 


4445 


021212 


051105 


051040 


051505 


4446 


021220 


052105 


000 




4447 










4448 










4449 










4450 










4451 










4452 


021223 


103 

xw 


047101 

r XVX 


047040 


4453 


021230 


052117 


041440 


042514 

V^C JX^ 


4454 

^^^^ 


021236 


051101 

V^XXVX 


041040 


v^cxxx 


4455 


021244 




04*^11 7 


04M40 


4456 


021252 


051513 


000 




4457 










4458 










4459 










4460 










4461 


021255 


102 


052111 


020067 


4462 


021262 


043117 


046040 


051513 


4463 


021270 


042040 


042517 


020123 


4464 


021276 


047516 


020124 


042523 


4465 


021304 


000124 
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TERMINAL OUTPUT TEST 

EM64: .ASCIZ /CAN NOT SET BIT6 OF LKS/ 
EM65: .ASCIZ /CAN NOT CLEAR BIT6 OF LKS/ 
EH66: .ASCIZ /RESET 010 NOT CLEAR BIT6 OF LKS/ 

EM67: .ASCIZ /BIT7 OF LKS NOT SET AFTER RESET/ 

EM70: .ASCIZ /CAN NOT CLEAR BIT7 OF LKS/ 
EM71: .ASCIZ /BIT7 OF LKS DOES NOT SET/ 



E7 
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SEO 006c 



44o6 




















AAi^A 
























ACI 1 Ot 




y** fill 


f 1 






\rr IOC'* 


OA7AA/> 


l£ 






fSAAAAn 


U3eXXO 


i3 








nOM 1 A 


AAIA. 






Ujlxv* 


U3X3U3 


AA-Mt 
f3 




WcUXcO 


'3X3 


nAA^AA 


#o 




nAAVtt^ 


rtAPI 
U^cXU3 


AAAAAn 


AAn 




nA7^i A 

f 3XO 


PA 

w^^XcH 




r O 




OAO 














































A4A^ 




















A4AS 




















44A7 




1?^ 


05PS14 

w JX^ 


OPOOftl 

w£\A^vX 




0P1574 




05P1 1 1 

w->CXXX 


044440 




0P140? 


0SP1 1f> 


051 1 05 

V JXXw J 


05P5PP 




AP1410 

vCX^X\i 


OSP1PO 


OPOIP^ 


044 1P7 






047105 

f XwJ 


04P040 


05151 1 

w JX JXX 


4492 


0?14?4 


041 101 
v^xxvx 


04P514 


000104 


4493 










4494 

^^^^ 










449S 










44 OA 










4497 










44 98 




04I>1P'^ 


0'^05P5 


05404O 


4499 




044S15 

JX J 


0P01 PA 


OAA5n4 


4S00 


0?144li 


0P0104 


04751#) 

f JXv 


0P01P4 




0214S4 


047111 
1 XXX 


04P5P4 


051 IPP 




0?14^ 
vcx^vc 


0501 PS 


0001P4 














4SA4 
































wcx^OO 


AAAI PT 


MMJJCJ 






OP 1474 


044515 


0P01PA 


0471 1 1 

f XXX 


4509 


OPIWP 


04P5P4 


051 1PP 


0501P5 




0P1S10 

VCX JXV 


0P01 P4 


05P101 
v3cXvX 






OPISIft 


OA45PP 


n^i 117 

U3XXX 1 


05P1 1 1 


4512 


021524 


020131 


000067 




4513 










4514 










4515 










4516 










4517 










4518 


021530 


046123 


030525 


054040 


4519 


021536 


044515 


020124 


047111 


4520 


021544 


042524 


051122 


050125 


4521 


021552 


051524 


053440 


052111 



.ASCIZ /WRITING TO ONE IfiTERNAL ADDRESS MODIFIED ANOTHER/ 



.ASCIZ /SLUl XMIT INTERRUPTS UHEN DISABLED/ 



.ASCIZ /SLUl XHIT DID NOT INTERRUPT/ 



.ASCIZ /SLUl XMIT INTERRUPT AT PRIORITY 7/ 



.ASCIZ /SLUl XMIT INTERRUPTS WITH ENABLE aEAR/ 



F7 



CJKOIBO 11/238 SLU LTC REPR 0IA6 
JKOIBO.Pll 24-MAR-86 09:57 



4522 


021560 


020110 


047105 


041101 


4523 


021566 


042514 


041440 


042514 


4524 


021574 


051101 


000 




4525 










4526 










4527 










4528 










4529 










4530 










4531 


021577 


123 


OP 4 M 

052514 


A O AAf 4 

020061 


4532 


021604 


f\A^ cr9/\ 

046530 


052111 


042040 


4533 


021612 


042111 


047040 


AC0 4 4 

052117 


4534 


021620 


044440 


052116 


ACT 4 4 AC 

051105 


4535 


021626 


052522 


ACO 4 OA 

052120 


AAA 

000 


4536 










4537 










4538 










4539 










4540 


021633 


4 AT 

123 


AC AC 1 A 

052514 


AOAA^ 4 

020061 


4541 


021640 


Ail C7A 

046530 


AC0 4 \ \ 

052111 


AC1 Ail A 

051040 


4542 


021646 


A A£ CAC 

026505 


Ail ^4 1 1 

047111 


Ail lOil 

042524 


4543 


A^ 4 f Cd 

021654 


AC 4 4 OA 

051122 


AC A 4 AC 

050125 


Ad AC Ad 

042524 


4544 


A^4 f £ ^ 

021662 


AAA* Ad 

000104 






4545 










4546 










4547 










454o 










4549 


A^4 A 

021664 


047514 


Ail A^ f\.S 

042101 


Ail^l 1 1 

047111 


A CCA 

4550 


A A 4 A 

021672 


AAA 4 A^ 

020107 


AJ£ 4 AT 

046123 


ATAC AC 

030525 


4551 


A'^* ^AA 

021700 


052040 


AC AC A A 

052502 


AAA4 Af 

020106 


4552 


AA4 "f 

021706 


0\A A CAd 

044504 


AAA4 Ail 

020104 


047516 


4553 


A') 4 ^1 ^ 

021714 


020124 


f\A£. f AT 

046103 


Ad ACAC 

040505 


A CC^ 

4554 


A^4 

021722 


AAA4 AA 

02012c 


f\.A ^444 

047111 


Ad ACAd 

042524 


4CCC 

4555 


AA4 ^VA 

021730 


AC \ \ A A 

051122 


ACA^ AC 

050125 


AAA 4 Ad 

000124 


4556 










4557 










455o 










A CCA 

4559 










4560 










AC£. t 

4561 










4562 


AA4 

021736 


AJ£ 4 A9 

046123 


ATAC AC 

030525 


AC 4 AAA 

051040 


4563 


A A 4 ^4 A 

021744 


ACT 4 AT 

053103 


AAA 4 OA 

020122 


AA^4 4 4 

047111 


4564 


021752 


0\A OP OA 

042524 


AC? 4 4 OO 

051122 


AC A 4 OC 

050125 


4565 


021760 


/\P 4 e*0 A 

051524 


053440 


052111 


4566 


AO* ^ 

021766 


AOA4 4 A 

020110 


A A ^ 4 AF 

047105 


AA 4 4 A4 

041101 


4567 


/\04 ^*t4 

021774 


t\A OCf 4 A 

042514 


041440 


A A OP 4 A 

042514 




OeevOie 


031101 


000 




4569 










4570 










4571 










4572 










4573 










4574 










4575 


022005 


123 


052514 


020061 


4576 


022012 


041522 


051126 


042040 


4577 


022020 


042111 


047040 


052117 
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TERMINAL OUTPUT TEST 



EMIOO: .ASCIZ /SLUl XMIT DID NOT INTERRUPT/ 



EMIOI: .ASCIZ /SLUl XMIT RE -INTERRUPTED/ 



EM102: .ASCIZ /LQi^ING SLUl TBUF DID NOT aEAR INTERRUPT/ 



EM103: .ASCIZ /SLUl RCVR INTERRUPTS WITH ENABLE aEAR/ 



EM104: .ASCIZ /SLUl RCVR DID NOT INTERRUPT/ 



G7 
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4j f O 










A>\7Q 








AAA 












* JOX 
































0P?O41 






0200A1 




0?P64I> 




051 12fk 


044440 




0i990M 


0521 \ (% 


051 lOS 


052 522 


45A7 


022062 


052120 


020123 


052101 




022070 


050040 


044522 


051117 

VJXXX ■ 




022076 


052111 


0201 31 


000067 

WWW ' 


4590 










4S91 










4592 










4593 










4594 










4595 


022104 


046123 


030525 


OS 1040 

V JX v^v 


4596 


022112 


053103 


020122 


0471 1 1 

■ XXX 


4597 






051 122 


05O125 


4598 


022126 

V w w X k V 


051524 


0534A0 


0521 1 1 

V^bXXX 


4599 


022134 


020110 


047111 

■ XX X 


042524 


4600 


022142 


051122 

Abb 


050125 


020124 


4601 


022150 


047105 


041101 

X X vx 


042514 

V^fc JX^ 


4602 


022156 


041440 


042514 


051101 


4603 


022164 


000 






4604 










4605 










4606 










4607 










4608 










4609 










4610 










4611 










4612 


022165 


123 


052514 

V ^b ^ X ~ 


020061 


4613 


022172 


041522 


051126 


042040 


4614 


022200 


042111 


047040 


052117 


4615 


022206 


044440 


052116 

X XV 


051105 


4616 


022214 


052522 


052120 

XK V 


000 


4617 










4618 










4619 










4620 










4621 


022221 


123 


052514 

V JX~ 


v/cwvx 


4622 


022226 


042522 


042505 




4623 


022234 


051105 


VJXX^tV 




4624 


022242 


047111 


042524 


051122 


4625 


022250 


050125 


042524 


000104 


4626 










4627 










4628 










4629 










4630 


022256 


046123 


030525 


051040 


4631 


022264 


040505 


044504 


043516 


4632 


022272 


051040 


052502 


020106 


4633 


022300 


044504 


020104 


047516 
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TERMINAL OUTPUT TEST 



EM105: .ASCIZ /SLUl RCVR INTERRUPTS AT PRIORITY 7/ 



EM106: .ASCIZ /SLUl RCVR INTERRUPTS UITH INTERRUPT ENABLE CLEAR/ 



Em07: .ASCIZ /SLUl RCVR DID NOT INTERRUPT/ 



EMllO: .ASCIZ /SLUl RECEIVER RE -INTERRUPTED/ 



EMlll: .ASCIZ /SLUl READING RBUF DID NOT CLEAR INTERRWT/ 



H7 
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SEO 008', 





022306 


020124 


046103 


Ail AC AC 

040305 




Uccj14 


020122 


04 rill 


042324 






031122 


030123 


AAA1 Oil 

000124 










































A£^% 
























0*cj22 


042323 


AOA1 OA 

020x24 






y443U4 


AOA1 

020104 


AA *7C1 £ 

04/316 




022344 


020124 


1 AT 

04ol03 


Ail AC AC 

040503 






nam o3 


0'»0X23 


03U323 


AMI 




n^in4n 


v30XU0 


UcUX2c 


AfiAR 




nA7i 1 1 


nA3*\9A 


n^i 1 33 

03X122 






v^VXC J 


9A 




■TO JV 






























•to J-J 








































4657 






070047 


0461 06 


4658 


09P414 


04'^ SOI 


049040 


0491 1 1 
v^exxx 






047040 


0S91 17 

v.>CXX ■ 


OS14AO 

w JX^HV 


4660 




0S9105 


000 




4^1 












































123 


U323X4 


AOAAiil 
O2OOOI 






OA3AA7 


03XX22 


A*;! 117 
U31XX r 


4Ail7 




n900A7 
OcvW f 


04 r3lD 


A3/M 3A 
v2vl24 








0901 3A 


AAAC37 


4669 




044194 

N^f^f XC"» 


APIA A A 


0^1 117 


4670 


0P9470 


090047 


046106 


04T^1 
V40JUX 


4671 


099476 


000 




467P 




















4A7A 










44>7^ 

ID 










4676 










4677 










467R 


099477 


Xv^ 


032X0X 


020x01 




699S04 




V/3UXX3 


A<\1 1 A1 
031X01 


4680 


022512 


020105 


051105 


047522 


4681 


022520 


000122 




4682 










4683 










4684 










4685 


022522 


046123 


031125 


054040 


4686 


022530 


044515 


020124 


047111 


4687 


022536 


042524 


051122 


050125 


4688 


022544 


051524 


053440 


042510 


4689 


022552 


020116 


044504 


040523 



■ASCIZ /RESET DID NOT CLEAR SLUl RCVR INTERRUPT/ 



•ASCIZ /SLUl 'OR' FLAG DID NOT SET/ 



.ASCIZ /SLUl 'ER«OR' NOT SET WITH 'OR' FLAG/ 



.ASCIZ /DATA COMPARE ERROR/ 



.ASCIZ /SLU2 XMIT INTERRUPTS UHEN DISABLED/ 



17 
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S£Q 008^ 







04^.1 OP 




000 












4692 










4693 










4694 










4695 










4696 


022565 


123 


052514 


020062 


4697 


022572 


046530 


052111 


042040 


4696 


022600 


042111 


047040 


052117 


4699 


022606 


044440 


052116 


051105 


4700 


022614 


052522 


052120 


000 


4701 










4702 










4703 










4704 










4705 


022621 


123 


052514 


020062 


4706 


022626 


046530 


052111 


044440 


4707 


022634 


052116 


051105 


052522 


4708 


022642 


052120 


040440 


020124 


4709 


022650 


051120 


047511 


044522 


4710 


022656 


054524 


033440 


000 


4711 










4712 










4713 










4714 










4715 










4716 


022663 


123 


052514 


020062 


4717 


022670 


046530 


052111 


044440 


4718 


022676 


052116 


051105 


052522 


4719 


022704 


052120 


020123 


044527 


4720 


022712 


044124 


042440 


040516 


4721 


022720 


046102 


020105 


046103 


4722 


022726 


040505 


000122 




4723 










4724 










4725 










4726 










4727 










4728 










4729 


022732 


046123 


031125 


054040 


4730 


022740 


044515 


020124 


044504 


4731 


022746 


020104 


047516 


020124 


4732 


022754 


047111 


042524 


051122 


4733 
4734 


022762 


050125 


000124 




4735 










4736 










4737 










4738 


022766 


046123 


031125 


054040 


4739 


022774 


044515 


020124 


042522 


4740 


023002 


044455 


052116 


051105 


4741 


023010 


052522 


052120 


042105 


4742 


023016 


000 






4743 










4744 










4745 











EM117: 



.ASCIZ /SLU2 XMIT DID NOT INTERRUPT/ 



Em20: .ASCIZ /SLU2 XMIT INTERRUPT AT PRIORITY 7/ 



EM121: .ASCIZ /SLU2 XMIT INTERRUPTS UITH ENABLE aEAR/ 



EM122: .ASCIZ /SLU2 XMIT DID NOT INTERRUPT/ 



EM123: .ASCIZ /SLUc! XMIT RE -INTERRUPTED/ 



J7 
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SEQ 0087 



4746 










4747 


025Q17 


114 


/\^AC 1 7 


W^30* 


4748 


023024 


043rlu 


051440 


052514 


4749 


023032 


020062 


Ail 1 1 Oil 

041124 


AAT1 OC 

042125 


4750 


023040 


AA'^A^A 

042040 


042111 


04f040 


4751 




05211 1 


AA1 AAA 

041440 


04C314 


475? 


023054 


AC1 4 A1 

051101 


044440 


AC31 1& 
05211O 


4753 


/%^»A^^ 

CeSOoZ 


AC1 1 AC 

051105 


052522 


AC31 OA 

052120 


4754 


023070 


AAA 

OUU 






* '55 










* '50 










4 f J/ 










4 f jO 










* / J7 










* »OW 






















03X071 


1 3'? 




0900ft3 




03V>7ft 
UcOv r D 


041 ■\33 


Oti 1 34« 


044440 




03T1 04 


0^31 1 & 


OH 1 0*\ 
v^llwJ 




4 to J 




A131 3A 


0301 3'* 


044137 


* 'OO 


03T1 30 


0441 34 


043440 


040H A 


A7ft7 
^ f O ' 


OOX1 341 


04A1 03 


0301 01 


04A10T 


A7AA 
^ /DO 


03T1X4 




000133 




A7AQ 




















4771 










4773 










^ / / o 










4774 










477«\ 


03X140 


04it1 3X 


0X1 1 3«; 


011 040 


477A 


03X14A 


OS'^IOT 

\JJOX\JO 


0301 3? 


AA4104 


4777 


03X1 S4 


030104 




A301 34 


477a 


03X1 fc3 


0471 1 1 
V* '111 


043<\34 


OH 1 33 


4770 


03X1 70 


o«;oi3*; 


000134 




47An 










47 A 1 










47113 




















47114 


03X1 74 
vc Jl 


04A1 3T 


OT1 1 3*; 


011040 




03X303 


O'l'tl nx 
U301U0 


0301 33 


a471 1 1 
04'111 




03T310 


043^34 


Oil 1 33 


0101 31 


47117 


03X31 A 


Oi\1 ■\34 


040440 


0301 34 


47AA 


03T334 


Oil 1 30 


047H 1 
'311 


044133 


47ftQ 
* ' O^ 


03T3T3 


0^^4 


0XX440 


OOO 












47Q1 










4799 










4793 










4794 










4795 


023237 


123 


052514 


020062 


47% 


023244 


041522 


051126 


044440 


4797 


023252 


052116 


051105 


052522 


4796 


023260 


052120 


020123 


044527 


4799 


023266 


044124 


044440 


052116 


4800 


023274 


051105 


052522 


052120 


4801 


023302 


042440 


040516 


046102 



.ASCIZ /LOADING SLU2 TBUF DID NOT CLEAR INTERRUPT/ 



.ASCIZ /SLU2 RCVR INTERRUPTS UITH ENABLE CLEAR/ 



.ASCIZ /SLU2 RCVR DID NOT INTERRUPT/ 



.ASCIZ /SLU2 RCVR INTERRUPTS AT PRIORITY 7/ 



.ASCIZ /SLU2 RCVR INTERRUPTS UITH INTERRUPT ENABLE aEAR/ 



I<7 



SEQ 008f 

CJK0I80 11/238 SLU LTC REPR OIAG MACYll 30(1046) 24-MAR-86 10:44 PAGE 89 
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4802 


023310 


020105 


046103 


040505 


4803 


023316 


000122 






4804 










4805 










4806 










4807 










4808 










4809 










4810 










4811 










4812 


023320 


046123 


031125 


051040 


4813 


023326 


053103 


020122 


044504 


4814 


023334 


020104 


047516 


020124 


4815 


023342 


047111 


042524 


051122 


4816 


023350 


050125 


000124 




4817 










4818 










4819 










4820 










4821 


023354 


046123 


031125 


051040 


4822 


023362 


041505 


044505 


042526 


4823 


023370 


020122 


042522 


044455 


4824 


023376 


052116 


051105 


052522 


4825 


023404 


052120 


042105 


000 


4826 










4827 










4828 










4829 










4830 


023411 


123 


052514 


020062 


4831 


023416 


042522 


042101 


047111 


4832 


023424 


020107 


041122 


043125 


4833 


023432 


042040 


042111 


047040 


4834 


023440 


052117 


041440 


042514 


4835 


023446 


051101 


044440 


052116 


4836 


023454 


051105 


052522 


0S2120 


4837 


023462 


000 






4838 










4839 










4840 










4841 










4842 










4843 










4844 










4845 


023463 


122 


051505 


052105 


4846 


023470 


042040 


042111 


047040 


4847 


023476 


052117 


041440 


042514 


4848 


023504 


051101 


051440 


052514 


4849 


023512 


020062 


041522 


051126 


4850 


023520 


044440 


052116 


051105 


4851 


023526 


052522 


052120 


000 


4852 










4853 










4854 










4855 










4856 










4857 











.ASCIZ /SLU2 RCVR 010 NOT INTERRUPT/ 



.ASCIZ /SLU2 RECEIVER RE -INTERRUPTED/ 



.ASCIZ /SLU2 READING RBUF DID NOT CLEAR INTERRUPT/ 



.ASCIZ /RESET DID NOT aEAR SLU2 RCVR INTERRUPT/ 



L7 



CJKDIBO 11/238 SLU LTC REPR DIAG 
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MACYll 30(1046) 24 -MAR- 86 
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10:44 PAGE 90 



SEQ 0089 



4858 


023533 


123 


052514 


020062 


4859 


023540 


047447 


023522 


043040 


4860 


023546 


040514 


020107 


044504 


4861 


023554 


020104 


047516 


020124 


4862 


023562 


042523 


000124 




4863 










4864 










4865 










4866 










4867 


023566 


046123 


031125 


023440 


4868 


023574 


051105 


047522 


023522 


4869 


023602 


047040 


052117 


051440 


4870 


023610 


052105 


053440 


052111 


4871 


023616 


020110 


047447 


023522 


4872 


023624 


043040 


040514 


000107 


4873 










4874 










4875 










4876 










4877 










4678 


023632 


046123 


031125 


041040 


4879 


023640 


042522 


045501 


042040 


4880 


023646 


042111 


047040 


052117 


4881 


023654 


052040 


040522 


051516 


4882 


023662 


044515 


020124 


046101 


4883 


023670 


020114 


042532 


047522 


4884 


023676 


051505 


000 




4885 










4886 










4887 










4888 










4889 










4890 










4891 


023701 


102 


042522 


045501 


4892 


023706 


042040 


042111 


047040 


4893 


023714 


052117 


051440 


052105 


4894 


023722 


043040 


040522 


044515 


4895 


023730 


043516 


042440 


051122 


4896 


023736 


051117 


000 




4897 










4898 










4899 










4900 










4901 










4902 


023741 


123 


052514 


020062 


4903 


023746 


042447 


051122 


051117 


4904 


023754 


020047 


047516 


020124 


4905 


023762 


042523 


020124 


044527 


4906 


023770 


044124 


023440 


051106 


4907 


023776 


020047 


046106 


043501 


4908 


024004 


000 






4909 










4910 










4911 










4912 










4913 











.ASCIZ /SLU2 'OR' FLAG DID NOT SET/ 



.ASCIZ /SLU2 'ERROR* NOT SET WITH 'OR' FLAG/ 



.ASCIZ /SLU2 BREAK DID NOT TRANSMIT ALL ZEROES/ 



.ASCIZ /BREAK 010 NOT SET FRAMING ERROR/ 



.ASCIZ /SLU2 'ERROR' NOT SET WITH 'FR' FLAG/ 



M7 

CJKDIBO 11/238 SLU LTC REPR DIAG 



JKDIBO. 


PU 


24 MAR -86 


09:57 




4914 










4915 


024005 


104 


052101 


020101 


4916 


024012 


047503 


050115 


051101 


4917 


024020 


020105 


051105 


047522 


4918 


024026 


020122 


044527 


044124 


4919 


024034 


041440 


041101 


042514 


4920 


024042 


000 






4921 










4922 










4923 










4924 










4925 










4926 


024043 


122 


041524 


044440 


4927 


024050 


052116 


051105 


052522 


4928 


024056 


05C120 


040440 


020124 


4929 


024064 


051120 


047511 


044522 


4930 


024072 


054524 


033440 


000 


4931 










4932 










4933 










4934 










4935 


024077 


122 


041524 


044440 


4936 


024104 


052116 


051105 


052522 


4937 


024112 


052120 


020123 


044127 


4938 


024120 


047105 


042040 


051511 


4939 


024126 


041101 


042514 


000104 


4940 










4941 










4942 










4943 










4944 


024134 


052122 


020103 


047111 


4945 


024142 


042524 


051122 


050125 


4946 


024150 


020124 


044504 


020104 


4947 


024156 


0475ie 


020124 


041517 


4940 


024164 


052503 


000122 




4949 








4950 










4951 










4952 










4953 


024170 


05ri22 


020103 


047111 


4954 


024176 


042524 


051122 


050125 


4955 


024204 


020124 


044504 


020104 


4956 


024212 


047516 


020124 


041517 


4957 


024220 


052503 


000122 




4958 










4959 










4960 










4961 










4962 


024224 


052122 


020103 


047504 


4963 


024232 


041125 


042514 


044440 


4964 


024240 


052116 


051105 


052522 


4965 


024246 


052120 


000 


4966 










4967 










4968 










4969 


024251 


122 


051505 


052105 



MACYll 30(1046) 24 MAR-86 10:44 PAfE 91 
TERMINAL OUTPUT TEST 

EM142: .ASCIZ /DATA COMPARE ERROR UITH CABLE/ 



EM143; .ASCIZ /RTC INTERRUPT AT PRIORITY 7/ 

EM144: .ASCIZ /RTC INTERRUPTS UHEN DISABLED/ 

EH145: .ASCIZ /RTC INTERRUPT DID NOT OCCUR/ 

Eril46: .ASCIZ /RTC INTERRUPT DID NOT OCCUR/ 

Eni47: .ASCIZ /RTC DOUBLE INTERRUPT/ 

EM150: .ASCIZ /RESET DID NOT CLEAR RTC INTERRUPT/ 



N7 



CJKDIBO 11/238 5LU L7C REPR DIAG 
JKDIBO.Pll 24 MAR -86 09:57 



MACYll 30(1046) 24-MAR-86 10:44 PAGE 92 
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O47040 






0SP1 1 7 


041440 


042S14 








OS 1040 


041^24 


497'^ 




044440 


052116 


051105 

W^XX 


4974 




0S2S22 




000 


4Q7S 










407A 










4Q77 










4978 










4979 










4980 




122 


041524 


044440 


4981 




052116 


051105 


052522 


4982 


024326 


052120 


042040 


042111 


4983 


024334 


047040 


052117 

w^bXX * 


041440 


4984 


024342 


042514 


051101 


053440 


4985 


024350 


052111 


020110 


044502 


4986 


024356 


033524 


047440 


020106 


4987 


024364 


045514 


000123 




4988 










4989 










4990 










4991 










4992 










4993 










4994 










4995 


024370 


046103 


041517 


020113 


4996 


024376 


042522 


042520 


052101 


4997 


024404 


041101 


046111 


052111 


4998 


024412 


020131 


051105 


047522 


4999 


024420 


000122 






5000 










5001 










5002 










5003 










5004 


024422 


046123 


030525 


051040 


5005 


024430 


041505 


044505 


042526 


5006 


024436 


020122 


052123 


052101 


5007 


024444 


051525 


042440 


051122 


5008 


024452 


051117 


000 




5009 










5010 










5011 










5012 










5013 


024455 


123 


052514 

w ^X~ 


020062 


5014 


024462 


042522 


042503 


053111 

V^WXXX 


5015 


024470 


051105 


051440 


040524 


5016 


024476 


052524 


020123 


051105 


5017 


024504 


047522 


000122 




5018 










5019 










5020 










5021 










5022 


024510 


047111 


047503 


051122 


5023 


024516 


041505 


020124 


042522 


5024 


024524 


042503 


053111 


020105 


5025 


024532 


047503 


047125 


020124 



.ASCIZ /RTC INTERRUPT DID NOT CLEAR UITH BIT7 OF LKS/ 



.ASCIZ /CLOCK REPEATABILITr ERROR/ 



.ASCIZ /SLUl RECEIVER STATUS ERROR/ 



.ASCIZ /SLUS RECEIVER STATUS ERROR/ 



.ASCIZ /INCORRECT RECEIVE COUNT SLUl/ 



B8 
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SEQ 009c 



5026 

5027 

5028 

5029 

5030 

5031 

5032 

5033 

5034 

5035 

5036 

5037 

503« 

5039 

5040 

5041 

5042 

5043 

5044 

5045 

5046 

5047 

5048 

5049 

5050 

:051 

5052 

5053 

5054 

5055 

5056 

5057 

5058 

5059 

5060 

5061 

5062 

5063 

5064 

5065 

5066 

5067 

5068 

5069 

5070 

5071 

5072 

5073 

5074 

5075 

5076 

5077 

5078 

5079 

5080 

5061 



024540 046123 030525 



000 



024545 
024552 
024560 
024566 
024574 
024602 
024610 



123 
040504 
046517 
042440 
044440 
051105 
000122 



052514 
040524 
040520 
051122 
020116 
044503 



020061 EM156: 

041440 

042522 

051117 

054105 

042523 



.ASCIZ /SLUl DATA COMPARE ERROR IN EXERCISER/ 



024612 
024620 
024626 
024634 
024642 



024647 
024654 
024662 
024670 
024676 
024704 
024712 



047111 
041505 
042503 
047503 
046123 



123 
040504 
046517 
042440 
044440 
051105 
000122 



047503 
020124 
053111 
047125 
031125 



052514 
040524 
040520 
051122 
020116 
044503 



051122 EM157: 
042522 
020105 
020124 
000 



020062 Eni60: 

041440 

042522 

051117 

054105 

042S23 



.ASCIZ /INCORRECT RECEIVE COUNT SLU2/ 



.ASCIZ /SLU2 DATA COMPARE ERROR IN EXERCISER/ 



024714 
024722 
024730 



024731 
024736 
024744 
024752 



024756 
024764 
024772 



051124 
052101 
000 



124 
020040 
050040 
051503 



042524 
020040 
041520 



050101 
044103 



051505 
042440 
020103 
000122 



052123 
051105 
020040 



041440 EM161: .ASCIZ /TRAP CATCHER/ 
051105 



021524 DH5: 

051122 

052040 



020043 DH6: 

020122 

041522 



.ASCIZ /TEST# ERR PC TCSR/ 



.ASCIZ /TEST# ERR PC RCSR/ 



C8 



SEQ 009' 

CJKDIBO 11/238 SLU LTC REPR DIAG MACYll 30(1046) 24-MAR-86 10:44 PAGE 94 

JKDIBO.Pll 24 MAR-86 09:57 TERMINAL OUTPUT TEST 



.ASCIZ /TEST# ERR PC RBUF/ 





o?sooo 




000 




5083 










5084 










5085 










5086 


025003 


124 


051505 


021524 


5087 


025010 


020040 


042440 


051122 


5088 


025016 


050040 


020103 

Vb 


051040 


5089 


025024 


052502 


000106 




5090 










5091 










5092 










5093 


025030 


042524 


052123 


020043 


5094 


025036 


020040 


051105 


020122 


5095 


025044 


041520 


020040 


041124 


5096 


025052 


043125 


000 




5097 










5096 










5099 










5100 


025055 


124 


051505 


021524 


5101 


025062 


020040 


042440 


051122 


5102 


025070 


050040 


020103 


046040 


5103 


025076 


051513 


000 




5104 










5105 










5106 










5107 


025101 


124 


051505 


021524 


5108 


025106 


020040 


042440 


051122 


5109 


025114 


050040 


020103 


043440 


5110 


025122 


040504 


051104 


020040 


5111 


025130 


041040 


040504 


051104 


5112 


025136 


020040 


043440 


042104 


5113 


025144 


052101 


020040 


041040 


5114 


025152 


042104 


052101 


000 


5115 










5116 










5117 










5118 










5119 










5120 










5121 










5122 


025157 


124 


051505 


021524 


5123 


025164 


020040 


042440 


051122 

Abb 


5124 


025172 


050040 


020103 


051040 


5125 


025200 


051503 


020122 


020040 


5126 


025206 


043440 


047517 


020104 


5127 


025214 


020040 


041040 


042101 


5128 


025222 


000 






5129 










5130 










5131 










5132 










5133 










5134 










5135 


025223 


124 


051505 


021524 


5136 


02S230 


020040 


042440 


051122 


5137 


025236 


050040 


020103 


051040 



.ASCIZ /TEST# ERR PC T8UF/ 



.A^jCIZ /TEST# ERR PC LKS/ 



.ASCIZ /TEST« ERR PC GOAOR BOAOR GOOAT BOOAT/ 



.ASCIZ /TEST« ERR PC RCSR GOOD BAD/ 



.ASCIZ /TEST# ERR PC RCSR DATA/ 



D8 
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10:44 PAGE 95 



SEO 009-1 



5138 


025 ?44 


051503 


020122 


020040 


5139 


02S252 


042040 


052101 


000101 


5140 










5141 










5142 










5143 










5144 


025260 


042524 


052123 


020043 


5145 


025266 


020040 


051105 


020122 


5146 


025274 


041520 


020040 


047507 


5147 


025302 


042117 


020040 


020040 


5148 


025310 


040502 


0J0104 




5149 










5150 










5151 










5152 










5153 


025314 


042524 


052123 


020043 


5154 


025322 


020040 


051105 


020122 


5155 


025330 


041520 


020040 


045514 


5156 


025336 


020123 


020040 


020040 


5157 


025344 


047103 


030524 


020040 


5158 


025352 


020040 


047103 


031124 


5159 


025360 


000 






5160 










5161 










5162 










5163 










5164 










5165 










5166 


025361 


124 


051505 


021524 


5167 


025366 


020040 


042440 


051122 


5168 


025374 


050040 


020103 


051040 


5169 


025402 


051503 


020122 


020040 


5170 


025410 


052040 


040522 


051516 


5171 


02S416 


020040 


051040 


053103 


5172 


025424 


000 






5173 










5174 










5175 










5176 










«il77 










5178 










5179 


025425 


124 


051505 


021524 


5180 


025432 


020040 


042440 


051122 


5181 


025440 


050040 


020103 


051040 


5182 


025446 


051503 


020122 


020040 


5183 


025454 


047440 


042114 


041520 


5184 


025462 


020040 


052040 


040522 


5185 
5186 


025470 


020120 


042101 


000122 


5187 










5188 










5189 










5190 










5191 










5192 


025476 


005015 


045103 


042113 


5193 


025504 


026511 


000102 



.ASCIZ /TEST# ERR PC GOOD 



BAD/ 



.ASCIZ /TEST* ERR PC LKS 



CNTl CNT2/ 



.ASCIZ /TEST« ERR PC RCSR TRANS RCV/ 



.ASCIZ /TEST# ERR PC RCSR 



OLOPC TRAP ADR/ 



.ASCIZ <CR><LF>/CJKOI-B/ 



E8 
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5EQ 00<* . 



5194 














5195 


0P5510 


200 






M2- 


ASCII 


51% 














5197 




025512 








EVEN 


5198 


025512 


001104 


001016 


002764 


DT5: 


UORD 


5199 


025520 


000000 










5200 














5201 


025522 


001104 


001016 


002760 


DT6: 


.UORO 


5202 


025530 


000000 










5203 














5204 


025532 


001104 


001016 


002762 


DT7: 


.UORO 


5205 


025540 


000000 










5206 














5207 


025542 


001104 


001016 


002754 


0T31: 


.UORO 


5206 


025550 


000000 








S209 














5210 


025552 


001104 


001016 


002756 


0T32: 


.UORO 


5211 


025560 


000000 










5212 














5213 


025562 


001104 


001016 


002750 


0T36: 


.UORO 


5214 


025570 


000000 










5215 














5216 


025572 


001104 


001016 


002752 


0T37: 


.UORO 


5217 


025600 


000000 










5218 














5219 


025602 


001104 


001016 


002770 


0T61: 


.UORD 


5220 


025610 


000000 










5221 














5222 


025612 


001104 


001016 


001020 


0T72: 


.UORO 


5223 


025620 


001022 


001024 


001026 






5224 


025626 


000000 










5225 














5226 














5227 


025630 


001104 


001016 


002760 


DTllS: 


.UORO 


5228 


025636 


001024 


001026 


000000 




5229 














5230 


025644 


001104 


001016 


002750 


0T137: 


.UORO 


5231 


025652 


001026 


000000 








5232 














5233 


025656 


001104 


001016 


001024 


DT142: 


.UORD 


5234 


025664 


001026 


000000 








5235 














5236 


025670 


001104 


001016 


002750 


DT157: 


.UORD 


5237 
5238 


025676 


012232 


012234 


000000 






5239 


025704 


001104 


001016 


002750 


0T161: 


.UORD 


5240 


025712 


012414 


012416 


000000 






5241 














5242 


025720 


000200 






BUFl: 


.BLKU 


5243 


026320 


000200 






BUF2: 


.BLKU 


5244 




000001 






.END 



UORD $ TESTN , tERRPC . CRCSR . 0 

UORO ♦TESTN.IERRPC.CRBUF.O 

UORD ♦TESTN.*ERRPC.TCSR.O 

UORD ♦TESTN.iERRPC.TBUF.O 

UORD »TESTN.$ERRPC,RCSR,0 

UORD $TESTN . lERRPC , RBUF , 0 

UORD »TESTN.»ERRPC.LKS.O 

UORO tlESTN . lERRPC . IGDADR . IBDADR , »GDDAT . iBDOAT , 0 



{SLUl INPUT BUFFER FOR BLAST TEST 
5SLU2 INPIT BUFFER FOR BLAST TEST 



F8 



CJKDIBO 


11/236 SLU Lie 


RcrK UXnb 




JKOIBO. 


Pll 24-MAK-80 


09: 57 




ABASE ■ 


176500 


1119 


964 


ACrlAJP" 


000000 


"7 AC A 


OTA 
9 JO 


HUcVCT" 


AAAA/VN 
000000 




9tf9 


AOfevn ■ 


AAAA^\ 
000000 


AAAA 
009* 


903 


AtNV ■ 


000000 




934 


Htrivn ■ 


uooooo 


r Tfdv 


QIC 

9o3 


Mr M 1 ML" 


/WVVV\ 
UUUUUU 


ro3v 


^eo 


AMAnOI a 


uuuuuo 


f Vow 


931 


AMADDOa 


wwov 


OUXV 


933 








930 


AM A no A a 


UUvKaJO 


OO f • 


901 


AMAMC1 a 






AJg 


AMAMC3a 


uouwo 


rriw 


93d 


AMAMCTm 

nnnnoo" 






930 








939 








93 X 






7Q1 A 
f ^X» 












AHTYD1 z 


/wvw^ 


7a7A 




A:>rTYP3» 

fll 1 1 1 r t 


(VVYWl 


OWV 




AMTYPT 






0^7 








tDv 


AOACC M 


WWW 


7A7A 


9eo 






30^X» 


T77A 


fir 1 criv 


\AAAAiX 


OXXO 


3C7D 


APT?T7a 




1 

X^07 


0030V 


APTCPfls 


SAA/XVA/ 




TTAAA 














7AAA 


QP7 


AtMTT > 


fVWW> 




Tf3W 


AIICLI) X 


fVViAftO 


77QA 


QT7 

y3 f 


AVFrtl » 
"•CI* 1 X' 




77 AA 


tOc 


A\/FrT3a 
nVCU 1 c 


VAAAAAJ 


OUOv 


^^3 


DUVCU 1 


Ot9A1l« 
UXc^XD 




TfkAAA 


RTTA ■ 


NAAAA/X 


rOev 


1 AAA 








971A 
c 1 X4 


RTTM a 
DX 1 lAJ ' 


UWUvX 






RTTm a 


UUWUc 


7d A 




DX 1 Vc 


A/yWkA 




7&A 


DX 1 SJO 


WvUXU 




7CO 
f 39 


DX 1 SJ^ " 


/VWlOA 
WWcV 


7ASA 


7^ 
f 30 


DX 1 MD " 


o<w\An 


7A7A 


7^7 
f 3 f 


DX 1 \^ * 


VAA/XUU 


7AAA 


r30 


RTT07 » 

DX 1 V f 




7AU 


7^^ 
f 33 


RTTAR M 
DX 1 * 


(WkATtA 


7AAA 


7^ 
f 34 


DX 1 V? * 




7ATA 


'33 


RTT1 s 
DX 1 X 




7A1 A 


X0U9 


DX 1 XU 


WcvW 


7AOA 


0£AC 


RTT11 s 
DX 1 XX ' 




7A1 A 




6IT12 » 


010000 


740A 




BIT13 - 


020000 


739# 


2745 


BIT14 - 


040000 


73M 


2693 


BIT15 • 


100000 


737# 


2698 


BIT2 - 


000004 


760# 


1612 


BIT3 - 


000010 


759# 


1607 


BIT4 - 


000020 


758# 


1604 
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3339« 3367 
33f9 



5239 

1613 1700 1961 1962 1965 1966 1969 1970 1979 1981 1983 
2721 2726 2730 2740 2744 2932 



3127 3267 
1846 2390 
2738 



3111 
3251 
2750 

2136 2796 
3784 3857 



G8 
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SEQ 0097 



BITS 
BIT6 



000040 
000100 



BIT7 • 

BITS ' 

BIT9 • 

BLAST 

BPT • 

BPTVEC- 

BUFl 

BUF2 

CATCH 

CHECK2 

CKSUR - 

C0NT41 

COUNT 

CR 

CRBUF 
CRCSR 

CRLF - 

CRPSU 

CRVECT 

CTBUF 

CTCSR 



CTPSU 
CTVECT 

DAOTBL 

DOISP ' 

0H115 

0H137 

0H142 

0H152 

DH155 

DH161 

0H32 

0H5 



DH6 



DH61 

0H7 
0H72 



000200 
000400 
001000 
011474 

000003 
000014 
025720 
026320 
012370 
012120 
104407 
010546 
012236 
000015 
002762 
002760 

000200 
003004 
003002 
002766 
002764 



003010 
003006 

006066 
177570 
025157 
025223 
025260 
025314 
025361 
025425 
025030 
024731 



024756 



025055 

025003 
025101 



7S7d 




1 ft07 






















756* 


1610 


1755 


1760 


1770 


1771 


1777 


1778 


1784 


1786 


1799 


1804 


1614 


iei5 


1821 


1822 


1829 


1831 


1992 


1997 


2007 


2008 


2014 


2015 


2025 


2027 


2040 


2045 


2055 


2056 


2062 


2063 


2074 


2076 


2155 


2160 


2170 


2171 


2177 


2178 


2187 


2189 


2225 


2228 


2268 


2281 


2286 


22% 


2303 


2310 


2328 


2337 


2347 


2361 


2366 


2374 


2394 


2407 


2412 


2422 


2429 


2436 


2456 


2465 


2475 


2494 


2499 


2507 


2527 


2528 


2543 


2548 


2565 


2572 


2599 


2610 


2629 


2637 


2662 


2670 


2808 


2836 


2845 


2869 


2888 


2909 


2917 


2955 


2956 


2959 


2974 


2993 


2994 


2995 






















755# 


2761 


3811 


3876 





















754# 

753# 
2798 

782# 

769# 
5242# 
2957 

821 
3007# 

657# 
2717 
2946* 

677# 
1527# 
1526# 
5227 

678# 
1540# 
1539# 
1529# 
1528« 
1784* 
2347* 
1542# 
1541* 
2331* 
2198« 

684« 
1344 
1434 
1449 
5153# 
1506 
1516 
1091 

990 
1126 
1284 

995 
1181 
1334 
1444 
1206 
1474 
1000 
1251 



292S« 



2983 
3080« 

3126 

2724# 

2965* 

3430 

1739 

1724 

3384 

1800 
1642 
1625 
1786 
2361* 
2330 
1756 
2343* 
2219 
901 
1490 
5135# 
1495 

5166# 

5179# 

5093# 

1008 

1131 

1289 

1046 

1186 

1339 

5079# 

1211 

1479 

1116 

5107# 



3010 



5243« 



3250 












2991 


3030« 










3829 


3832 


3835 


3838 


5192 




5204 












1799* 


1804 


1814* 


1815 


1821* 


1822 


5195 












1801* 


1836* 


2942 


3024* 






1661* 


1666* 


1704* 


1707* 


2367* 


2370* 


1662 


1667 


1673 


1705 


1710 


1755* 


2268* 


2271 


2281* 


2266* 


2296* 


2301 


2366* 


2368 


2374* 


2993* 


5198 




2332* 


2354* 










1757* 


1791* 


2269 


2270* 


2280* 


2288* 


2353* 


2364 


2365* 


2380* 


2941 


3023* 


2220 


2226 










1577 












1501 


5122« 










1511 


5144« 











1829* 1831 3788 3861 



5201 



1760 1770* 1771 1777* 1778 
2303* 2310* 2328* 2335 2337* 



2299 2300* 2311* 2320* 2329 



1016 


1021 


1026 


1031 


1036 


1041 


1086 


1096 


1101 


1106 


1121 


1136 


1141 


1146 


1151 


1156 


1161 


1259 


1264 


1269 


1274 


1279 


1349 


1354 


1359 


1364 


1369 


1374 


1379 


5072# 




1171 


1176 


1051 


1056 


1061 


1066 


1071 


1076 


1081 


1111 


1166 


1191 


1196 


1201 


1294 


1299 


1304 


1309 


1314 


1319 


1324 


1329 


1384 


1389 


1394 


1399 


1404 


1409 


1414 


1419 


1424 


1429 


1439 


1216 


1221 


1226 


1231 


1236 


1241 


1246 


1454 


1459 


1464 


1469 


1484 


5100# 




















5086« 























H8 
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DTCDl A 






1 «;77* 

XD r ' • 






ATI A 


1 SAS 
X^OJ 




1 77';7n 






nil 1 ^ 




X0^3 


1 AQ1 

XH^X 


nil T7 


A^cr.iiii 


X"*v3 








1450 




nTm7 




1507 

X f 








1517 

X JX f 


5939d 


u 1 ox 


n?SSA9 


10A7 

XVO f 


10Q7 

Xw7 r 






1350 


1355 

Xw J J 




o?ssv 


XV7C 


5210d 




095569 




1167 

XXV r 






1405 


1410 

X~X V 


DT37 


025572 


1117 

XXX f 


5216<^ 

^bX V' 


nis 




y^x 


1009 

X W7 






1P85 

XCw J 


1290 






996 


1047 

XV^ » 






1315 

X ^X ^ 


1320 


DT61 


025602 


1207 

XbV r 


1212 

XbXb 






1475 

x^ r ^ 


1480 

X^ w 


DT7 


025532 


1001 

X wx 


52044^ 


DT72 


025612 


1252 


5222<^ 




015406 

VX 


836 


37824 




000030 


772# 


1561* 


EMIOO 


021577 


1278 

XCk • w 


4531<^ 




021633 


1283 


4540# 




021664 


1288 


45494 


EM103 


021736 


1293 


45624 




022005 


1298 


45754 


EMI 05 


022041 


1303 


45844 


EHi06 


022104 


1308 


45954 


EM107 

Wi lAV f 


022165 


1313 


46124 


EMU 

IX X 


016150 


1007 


39184 

7X W 


EMllO 


022221 


1318 

X^XU 


46214 


EMlll 

wi IXXX 


022256 


1323 


46304 


EM112 


022330 


1328 


46434 


EM113 


022400 


1333 


46564 


EM114 


022433 


1338 


46654 


EMI 15 

W< IXX^ 


022477 


1343 

X«^^«/ 


46784 


EMI 16 


022522 


1348 


46854 


EM117 

W IXX ■ 


022565 


1353 


46964 


EM120 


022621 


1358 


47054 


EM121 

^1 iXbX 


022663 


1363 


47164 

^ 1 X W 


EMI?? 

wi iXCc 


0??75? 


1368 


47294 


EM1?3 


0??766 


1T7T 

x^ ■ ^ 




wl IXC~ 


0?3017 


X^ r 0 


47474 


EM125 


023071 


1383 


47624 


EM126 


023140 


1388 


47754 


EM127 


023174 


1393 


47844 


EM13 


016206 


1015 


39274 


EM130 


023237 


1398 


47954 


EM131 


023320 


1403 


48124 


EM132 


023354 


1408 


48214 


EM133 


023411 


1413 


48304 


EM134 


023463 


1418 


48454 


EM135 


023533 


1423 


48584 
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1585* 


3106* 


3278* 


3783* 


3856* 




3783 


3856 










X^ ■ D 












1502 


52274 










1512 

X^Xb 


52334 










1 109 
xxvc 


1107 

XXV r 


1122 
xxcc 


1127 

xxc ■ 


1132 

X X^b 


1137 

XX^ r 


1360 

X 


1365 


1370 


1375 


1380 


52074 


1172 


1177 


1182 


1187 


1192 


1197 


1415 


1420 


1425 


1430 


1445 


52134 


1017 


1022 


1027 


1032 


1037 


1042 


51984 












1052 


1057 


1062 


1067 


1072 


1077 


1325 


1330 


1335 


1340 


1440 


52014 


1217 


1222 


1227 


1232 


1237 


1242 


1485 


52194 











3817 
1562* 



SEQ 0098 



1142 


1147 


1152 


1157 


1162 


1202 


1385 


1390 


1395 


1400 


1260 


1265 


1270 


1275 


1280 


1082 


1295 


1300 


1305 


1310 


1247 


1455 


1460 


1465 


1470 



18 





1 1 /yjn Qi 1 1 1 Tr 








PI 1 SA.MAO.AA 
rxx cH-nnft-oo 










142A 


4A67d 

■too 1 w 


PHI '^7 




1433 


■TO ' Ow 




UXDC^H 


10?0 


3940d 


PHI dn 




1438 


~w yx w 


PHI A1 


VCO 1 ^X 


1443 


4902d 

■f 7VW V 


PHI 




1448 


4915d 

~ 7XWw 


PHI 43 


024043 


1453 


49264 




024077 


145A 


4935d 

■f 7WWw 




0241 34 


1463 

X~v J 


4944d 




024170 


1468 


4953# 


FM147 


024224 

\/w~ww~ 


1473 


49620 


PHIS 


016324 


1025 

XVw^ 


3953<> 

W 7WW w 




0P4PS1 


1478 

X~ 1 V 


49690 


EM151 


024313 


1483 

X~ Vw 


49800 


EM152 


024370 


4995# 








1489 


50040 




024455 


1494 


50130 


Wl IX 


024510 


5022# 






024545 


1500 

X^W 


50310 

WVWX w 


K.I IX .J • 


024f>12 


1505 


50440 


K.I IXU 


016372 


1030 

X V wV 


39660 


EM160 


024647 


1510 


50530 


EM161 


024714 


1515 

X wx w 


50660 


EMI? 

t.1 IX ■ 


016430 


1035 

xvww 


39750 




016470 


1040 

X V^W 


39860 


EM21 


016536 


1045 

X V^ w 


39990 


EM22 

Wl iww 


016606 


1050 


40120 

^VXW " 


Wl 


016652 

VX Wv^C 


1055 

xvww 


40230 

^Vw WW 


EH24 

wl 


016710 

VAV ' XV 


1060 

X wv 


40320 


Wl 


016750 


1065 


40430 


w iwu 


017023 


1070 


40580 


0127 

Wl IW 1 


017060 


1075 

XV f w 


40670 


EI130 


017123 

VX • X£ V 


lOflO 

X wv 


40780 


EM31 


017175 


1085 


40930 


EM32 

Wl l«/W 


017234 

VX 1 w«^^ 


1090 


41040 


EM33 


017273 


1095 

XV 7W 


41150 

~XXWw 


W> I^^T 


017345 

VX * 


1100 

XX w 


41300 


EM35 

Wl »w J 


017413 

VX 1 ~ X ^ 


1105 

xxvw 


41430 


En36 


017455 

VX * 


1110 

XXXV 


41540 


Wl 1^ ( 


017514 

VX 1 ■JX^ 


1115 

XXX'W 


41650 


FM40 

Wl • • s/ 


017553 

VX * 


1120 

XXwV 


41760 

^X ' 


EfHl 


017623 

VX 1 Www 


1125 


41890 

~Xw ^ w 


□142 


017661 

wx ■ wwx 


1130 


42000 


En43 


017721 

VX • ■ W X 


1135 

XX WW 


42110 


En44 


017767 


1140 


42240 


EFHS 


020037 

Vt 1 


1145 

XX^W 


42370 


En46 


020105 

VW VXV^ 


1150 

XXwV 


42500 


En47 


020143 


1155 

XX WW 


42610 


EMS 

Wl 1^ 


016010 

vxwxv 


989 


38850 


Wl 


020203 


1 1M 

XXvv 


4P7Pd 


EM51 


020251 


1165 


42850 


EM52 


020321 


1170 


42980 


EM53 


020365 


1175 


431K 


EM54 


020423 


1180 


43220 


EM55 


020463 


1185 


43330 


En56 


020536 


1190 


43480 
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EM57 


020573 


1195 


4357* 




016052 


994 


38%* 


EM60 


020636 


1200 


4368* 


EM61 


020710 


1205 


4381* 


En62 


020741 


1210 


4390* 


Eil63 


021003 


1215 


4401* 


OifA 


021041 


1220 


4412* 


EM65 


021071 


1225 


4421* 


En66 


021123 


1230 


4430* 


EM67 


021163 


1235 


4441* 


EM7 


016111 


999 


3907* 


EM70 


021223 


1240 


4452* 


EM71 


021255 


1245 


4461* 


EM72 


021306 


1250 


4470* 


En74 


021367 


1258 


4467* 


EM75 


021432 


1263 


4498* 


EM76 


021466 


1268 


4507* 


EM77 


021530 


1273 


4518* 


ERRVEC- 


000004 


765# 


1574 


FINIE 


012170 


3021« 




GTSUR - 


104406 


6S6« 


1600 


HT 


000011 


675# 


3382 


ID 


003660 


1615 


1674 


lOHAND 


012036 


2966 


2975 


lOTVEC- 


000020 


770* 


1559* 


LF 


000012 


676« 


3434 


LKS 


002770 


1530# 


2142 






2845* 


?869* 


LTCIT 


010762 


2392 


2789* 


LTCRT 


005626 


1848 


2129* 


MFR 


015627 


3805 


3832* 


noR 


015641 


3810 


3835* 


HPAR 


015616 


3800 


3829* 


MSG 


015570 


3799 


3804 


MSTOP 


015654 


3815 


3838* 


Ml 


025476 


1690 


5192* 


m 


025510 


1692 


5195* 


OLOPC 


012414 


3083* 


3087* 


OUTTST 


015664 


837 


3855* 


PIRQ « 


177772 


682* 




PIRQVE- 


000240 


776# 




PRO 


000000 


699* 




PRl " 


000040 


700* 




PR2 


000100 


701* 




PR3 - 


000140 


702* 




PR4 - 


000200 


703* 




PR5 • 


000240 


704* 




PR6 • 


000300 


705* 




PR7 - 


000340 


706* 




PS 


177776 


679* 


680 


PSU - 


177776 


680* 




PURVEC- 


000024 


771* 


1565* 


R8UF 


002752 


1523* 


1947 






2750 


2777 


RCSR 


002750 


1522* 


1931 






2125 


2528* 
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1575* 1586* 3256 3257* 3259* 3262* 



1683* 

2991* 

1560* 

3829 

2155* 

2888* 



3832 3835 3838 5192 

2160 2170* 2171 2177* 2178 

2909* 2917* 2959* 2995* 5219 



2187* 2189 2808* 2817* 2836* 



3809 3814 3820* 3871 



5239 
3882 



2217* 


2938* 


2961* 


2999* 






1566* 


3194* 


3195* 


3204* 


3212* 


3221* 


2090* 


2111 


2120* 


2124 


2516 


2633 


2978 


2980 


2989 


5216 




2063 


2040* 


2045 


2055* 


2056 


2062* 


2534 


2543* 


2548* 


2563 


2565* 


2572* 



3222* 
2693 

2074* 

2597 



2698 

2076 
2599* 



2713 2724 2745 



2093 
2610* 



2106 
2629* 



2122 
2631 



K8 
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2637* 


2662* 






5236 


5239 


ROCHR ■ 


104410 


6584 


3701 


KULIN ■ 


104411 


659# 




RECCT2 


012234 


2945* 


2977* 


KtCS 


011762 


2950 


2977* 


KtSVtC" 


000010 


766* 




RPSU 


002774 


1536* 


2591 


R 1 CP 5U 


003014 


1544* 


2804 


nlCVT 


009012 


1543* 


2156 






2oo9* 


2905 


RVcCT 


002772 


1535* 


2041 






2592* 


2o0o* 


CJ 1 11 TT 


006262 


2250* 




CI 1 rtTT 


00/016 


2261 


2265 


CI 1 lOOT 


004402 


1 ££A 

1660 


1702 


O 1 nLK ■ 


001 lUO 


6 '0* 




b 1 AH 1 


OO0OI6 


B35 


1 CA£.A 

1546* 


O 1 KLn 1 ■ 


1 f f f »4 


601* 




CUD 


AA1 AAA 

0U104U 


OAAA 
900* 


1 ccc 

1555 






3111 


3123 


cuDcr 


0001 f D 


032v 


1 KUA 

1504 


cun m 


UOUOOl 








VAJUOUl 




»34 


cuni m 


OOUWe 


'23* 


TXT 

'33 


omic " 


AAAAAA 
000004 


'22* 


'32 




/WVM A 


f 21» 


7T1 

'31 




UOOOcU 


f 20w 


7TA 
'30 


cijn<\ a 


AA/V\AA 

oooow 


'IW 


lei 




OOOiOO 


71 OA 
'lO* 


'28 


curt? a 


AAAOAA 
OOOcOO 


71 7* 
f 1 f » 






uoo#oo 


71 £.A 
flow 


7^t 


CLIOO a 


AA« AAA 

001000 


71 

fl5* 


70C 

'25 


CU1 a 


OOOOOe 


733* 




CUI f\ a 


OOcOOO 


71 AA 

f 14* 




CUI 1 a 


oowoo 


71 TA 

rl3* 




CUI a a 


A1 AAAA 
010000 


T1 ^A 

7x2* 




CUI T a 


A 9 AAAA 

OeOOOO 


71 1 A 

rll* 




CUI A a 


AAAA/V^ 

040000 


71 AA 

rlO* 




CUI ^ a 


1 AAAAA 
100000 


^AOA 




cuo « 
OHc " 


AAAAAJI 
000004 


732* 




CUT • 


000010 


711 A 

731* 




CUA a 


/WV\3A 
vOOOeO 


r30* 




SU5 - 




'29* 




CUfc a 


AAni AA 
000100 


How 




^U7 a 




707A 




CUA a 


000*00 


^*SCA 












TBITVE- 


000014 


767* 




TBLEND 


006076 


2202* 


2233 


TBUF 


002756 


1525* 


1867 


TCSR 




2630* 


2663* 


002754 


1524* 


1852 






1979* 


1981 






2407* 


2412* 






2507* 


2527* 
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2664 


2670* 


2711 


2716 


2742 


2770 


2956* 


3786 


3859 


5213 


5230 


3007 


3029* 


5236 


















2593* 


2611* 


2951* 


















2806* 


2847< 


2862 


2864* 


2890* 


2953* 












2157* 


2194* 


2803 


2805* 


2819* 


2823* 


2834* 


2846* 


2861 


2863* 


2878* 


2906* 


2923* 


2943 


2952* 


3025* 












2042* 


^AAI A 

2081* 


2529 


2530* 


2542* 


2550* 


2560 


2561* 


2573* 


2582* 


AA 

2590 


0^1 7* 
261 '* 


2627 


2o2o* 


2643* 


2660 


2661* 


2677* 


2940 


2950* 


3022* 




2383* 






















1839* 






















1576* 


1578 


1584* 


1591* 


1598 


1604 


1607 


1610 


2685 


2738 


2761 


3127 


3202 


3214* 


3251 


3267 


35% 


3633* 


3782* 


3784 


3855» 


3857 


1598 


35% 


3609 


3782 


3855 















1884* 1889* 1911* 1914* 2092* 2121* 2500* 2503* 2533* 2562* 25%* 

2688* 2710* 2741* 2768* 2971* 5210 

1885 1890 1894 1912 1917 1%1* 1962 1%5* 1966 1%9* 1970 

1983* 1992* 1997 2007* 2008 2014* 2015 2025* 2027 2394* 2397 

2422* 2427 2429* 2436* 2456* 2463 2465* 2475* 2494* 2499* 2501 

2689 2714* 2721* 2726* 2730* 2740* 2744* 2955* 2974* 2994* 5207 



L8 
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01 1 71 A 


2952 

b 7 Jb 


2965* 




VAAA^VV 


7744 




1 




1^3Bd 


2458 


Tpvpr a 




775* 




1 nWr VC 




773# 


1563* 




000014 










1614 


1621* 




004?:^ 


1797# 






004402 


1844* 




TST12 

■ «J ■ Xb 


004456 


1863* 




TST13 

I <J ■ Xw 


004516 

JAW 


1877# 




TST14 


004610 


1862 


1904* 


TST15 


004670 


1<";09 


1927* 


TST16 


004730 


1943* 




TST17 


004770 


1895 


1959* 


TST2 


003476 


1638* 




TST20 


005126 


1918 


1977 


TST21 


005310 


2038* 




TST22 


005472 


2088* 




TST23 


005564 


2118* 




TST24 


005626 


2126 


2134* 


TST25 


005702 


2153* 




TST26 


006100 


2210* 




TST27 


006262 


2215 


2255* 


TST3 


003544 


1654* 




TST30 


006430 


2294* 




TST31 


006550 


2326* 




TST32 


006704 


2359* 




TST33 


007016 


2388* 




TST34 


007140 


2420* 




TST35 


007260 


2454* 




TST36 


007414 


2487* 




TST37 


007556 


2492 


2525* 


TST4 


003714 


1680 


1698* 


■''ST40 


007676 


2556* 




TST41 


010014 


2588* 




TST42 


010146 


2623* 




TST43 


0102S2 


(2650* 




TST44 


010376 


2655 


2683* 


TST45 


010464 


2686 


2708* 


TST46 


010572 


2736* 




TST47 


010664 


2739 


2759* 


TST5 


003772 


1711 


1720* 


TST50 


010762 


2762 


2781 


TST51 


011210 


2854* 




TST52 


011356 


2859 


2896* 


TST53 


011474 


2901 


2930* 


TST6 


004032 


1735* 




TST7 


004072 


1753* 




TVECT 


002776 


1537* 


1993 






2459* 


2471* 


TYPOS - 


104405 


655* 


3054 


TYPE - 


104401 


651* 


1689 






3226 


3387 


TYPOC - 


104402 


652* 


3157 


TYPON - 


104404 


654* 
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2460* 2482* 2949* 



SEQ 0102 



1564* 

3065 



1982 



1990* 



2794* 



1994* 
2481* 

1691 
3500 
3181 



2032* 
2497 

3052 
3575 
3610 



2395 
2498* 

3055 
3607 



2396* 
2517* 

3114 
3608 



2406* 
2939 

3149 
3611 



r414* 
2948* 

3166 
3624 



2425 
3021* 

3168 

3635 



2426* 2437* 2446* 2457 



3171 
3654 



3173 
3705 



3177 
3708 



3184 

3712 



MB 

SEQ 0103 
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JKDIBO. 


Pll 24-nAR-86 


09:57 




CROSS REFERENCE 


TABLE -- 


USER SYMBOLS 














TYPOS - 


104403 


653* 


























UNIQUE 


006100 


2138 


2195 


2205* 






















WAIT 


015576 


3822* 


3823 


3826 






















WAITER 


012074 


29% 


2999* 
























UAITIO 


011712 


2962* 


2%3 
























UOONE 


005514 


2093* 


2096 
























URPSU 


012356 


1758 


1802 


1995 


2043 


2158 


2273 


2297 


2312 


2333 


2344 


2362 


2371 


2399 






2423 


2438 


2461 


2472 


2495 


2504 


2531 


2558 


2574 


2594 


2607 


2625 


2634 






2658 


2667 


2801 


2820 


2865 


2879 


290^ 


2914 


3073* 










XMIT2 


011726 


2948 


2969* 
























XMTCT2 


012232 


2944* 


2969* 


2972 


3007 


3012 


3028* 


5236 














XXX 


011110 


2819 


2823* 
























lAPTHD 


000500 


859 


865* 
























♦ATYC 


013312 


3289 


3291* 
























♦ATYl 


013266 


3287* 


























♦ATY3 


013274 


3288* 


3372 
























♦ATY4 


013304 


1628 


1645 


1669 


1677 


3119 


3290* 
















$AUTOe 


001034 


897* 


1602* 


3604 






















IBASE 


001154 


964* 


























IBOAOR 


001022 


892* 


2239* 


5222 






















>BOOAT 


001026 


894* 


2241* 


2784* 


2980* 


3015* 


5222 


5227 


5230 


5233 










$CHARC 


014064 


3389* 


3399* 


3406 


3432* 


3437* 


















tCKSUP 


014542 


3596* 


3771 
























♦CMTAG 


001000 


880* 


1553 
























♦CNTLG 


015277 


3607 


3722* 
























♦CNTLU 


015272 


3624 


3721* 
























♦CPUOP 


001126 


938* 


























»CRLF 


001075 


917* 


3114 


3149 


3166 


3173 


3177 


W AO 

3366 


3635 


3873 










IDBLK 


014532 


3541 


3575 


WAV A. 

3563* 






















♦OEVCT 


001110 


929* 


1687 
























♦DEVM 


001156 


965* 


1549* 


1606* 


1609* 


1612* 


1613 


a ^/\A 

1700 


1646 


2136 


2263 


2390 


27% 




lOOAGN 


012332 


3048 


3057 


3063* 






















♦DTBL 


014522 


3544 


3579* 
























lENOAO 


012322 


846 


3059* 


3134 






















♦ENDCT 


012270 


1567 


3050* 
























*ErcnG 


012341 


3052 


3067* 
























(ENULL 


012336 


3055 


3066* 
























lENV 


001120 


934* 


15% 


1656 


1879 


1906 


1974 


2020 


2069 


2100 


2162 


2212 


2257 


2469 






2652 


2856 


2898 


2932 


3116 


32% 


3320 


3367 












lENvn 


001121 


935* 


1589 


3298 


3369 


3374 


















lEOP 


012240 


2936 


3026 


3041* 






















♦EOPCT 


012262 


1567* 


3047* 


3051 






















♦ERFLG 


001003 


883* 


3104* 


3265 


3271* 




















♦ERMAX 


001015 


889* 


1569* 


3277* 






















lERROR 


012420 


1561 


3103* 




















5216 


5219 


♦ERRPC 


001016 


890* 


3106* 


3109* 


3110 


3155 


5198 


5201 


5204 


5207 


5210 


5213 






5222 


5227 


5230 


S233 


5236 


5239 
















lERRTB 


001160 


982* 


3163 
























♦ERRTY 


012602 


3113 


3148* 
























♦ERTTL 


001012 


887* 


3107* 
























♦ESCAP 


001072 


915* 


1568* 


3130 


3132 


3276* 


















$ETABL 


001120 


933* 
























♦ETEND 


001160 


871 


966* 
























$FATAL 


001102 


926* 


1546* 


3324* 






















♦FFLG 


013532 


3287* 


3290* 


3318 


3327* 


3335* 


















♦FILLC 


001056 


908* 


3392 

























N8 



CJKDIBO 


11/238 SLU LTC 


REPR OIAG 




MACYll 


30(1046) 


24 -MAR 


-86 10: 


JKDIBO. 


Pll 24-MAR-86 


09:57 




CROSS REFERENCE 


TABLE - 


- USER S 


♦FILLS 


001055 


907# 












IGOAOR 


001020 


891* 


2238* 


5222 








IGOOAT 


001024 


893« 


2240* 


2783* 


2985* 


2987* 


3016* 


»GET42 


012312 


3056« 












«GTSUR 


014612 


3608« 


3769 










♦HIBTS 


000500 


866# 












♦ICNT 


001004 


884« 












' »ILLUP 


013076 


3194 


3212 


3229* 








* »INTAG 


001035 


898« 


3636 












001014 


888« 


3110* 


3118 


3152 






»LF 


001076 


918« 


3712 










ILFLG 


013531 


3328* 


3334* 










ILPAOR 


001006 


885« 


1570* 


3269* 


3274* 


3279 




♦LPEfM? 


001010 


886« 


1571* 


3129 


3269 


3275* 




IMAORl 


001132 


951# 












«nA0R2 


001136 


955# 












IKAORS 


001142 


958« 












tnA0R4 


001146 


%!• 












(HAIL 


001100 


867 


871 










tMAMSl 


001130 


945* 












$nAMS2 


001134 


953* 












IHAHSS 


001140 


956* 












«H/V1S4 


001144 


959« 












tWAOR 


000502 


667« 












»MFLG 


013530 


3288* 


3294 


3329* 


3333* 






IMNEU 


015315 


3611 


3726* 










tnSGAO 


001114 


931« 


3304* 


330 r 








tnSGLG 


001116 


932« 


3309* 










♦riSGTY 


001100 


925# 


1547* 


3302 


3310* 


3322 


3325* 


«KSUR 


015304 


3608 


3723* 










♦MTYPl 


001131 


946« 












»mYP2 


001135 


954# 












♦MTYP3 


001141 


957# 












♦MTYP4 


001145 


960* 














001054 


906* 


3394 










»OCNT 


014312 


3472* 


3501* 


TCI MM 

3514# 








lonooE 


014314 


3467* 


3471* 


3476 


3479* 


3490* 


3516* 


lOVER 


013252 


3252 


3270 


327o# 








IPASS 


001106 


928* 


1588* 




1605 


1881 


1908 






2491 


2654 


2858 


2900 


2934 


3044* 


IPASTM 


000506 


869* 












IPOUER 


013104 


3227 


3232* 










IPURON 


012736 


1565 


3194* 


3221 








IPURtC 


013072 


3227* 












IPURUP 


013010 


3204 


3212* 










tOUES 


001074 


916* 


3654 


3705 








IROCHR 


015024 


3667* 


3772 










IROLIN 


015154 


3697* 


3773 










IRTNM) 


012334 


3065* 












ISAVR6 


013102 


3203* 


3213 


3223* 


3224* 


3231* 




♦SCOPE 


013114 


1559 


3249* 










♦SETUP- 


000137 


649* 












♦STUP - 


177777 


649* 












♦SVLAO 


013216 


3260 


3266 


3272* 








»SVPC • 


000500 


844* 


849 










)SUR - 


161000 


663* 


781* 











SEQ 0104 



5227 



5233 



1976 
3045* 



2022 
3053 



2071 



2102 2184 2214 2259 



B9 
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)SUREG 001122 
♦SURMR- 000000 
ITESTN 001104 



^ ITKB 

»TMP0 
♦TMPl 
♦TMP2 
♦TMP3 
♦TMP4 
»TN • 
♦TPS 
♦TPFLG 
♦TPS 
♦TRAP 
♦TRAP2 
♦TRPAO 
♦TSTM 
♦TSTW 
♦TTYIN 
♦TYPOS 
♦TYPE 
♦TYPEC 
♦TYPEX 
♦TYPOC 
♦TYPON 
♦TYPOS 
♦UNIT 
♦UNITH 
♦USUR 
♦VECTl 
♦VECT2 
♦XOFF - 
♦XON - 
♦XTSTR 
♦OFILL 



001046 
001044 
001060 
001062 
001064 
001066 
001070 
000001 
001052 
001057 
001050 
015326 
015350 
015362 
000504 
001002 
015262 
014316 
0135^ 
013746 
014066 
014114 
014130 
014070 
001112 
000510 
001124 
001150 
001152 
000023 
000021 
013126 
014313 
026720 



, ♦ERRT 001160 
.♦X « 000500 



936« 
664« 
927# 
1905* 
2327* 
2737* 
5216 
903# 
902« 
910# 
911# 
912# 
913# 
914« 
662« 
905# 
909# 
904« 
1563 
3751# 
3745 
868« 
882« 
3698 
3529« 
3315 
3391 
3433 
3470# 
3469 
3465* 
930* 
870* 
937* 
962* 
963* 
661* 
660* 
3254* 
3466* 
813* 
860* 
3583* 
984* 
855* 



1591 

1548* 
1928* 
2360* 
2760* 
5219 
3413 
3411 
2939* 
2940* 
2941* 
2942* 
2943* 
665* 
3429* 
3361 
3427 
3740* 
3762 
3762 » 

3043* 

3699 

3767 

3361* 

3398 

3435 

3764 

3472* 

3765 
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1622* 
1944* 
2389* 
2795* 
5222 
3420 
3418 
3021 
3022 
3023 
3024 
3025 
780* 



SEO 0105 



3106 
3716 

3763 
3405 
3438* 

3766 



1639* 


1655* 


1699* 


1721* 


1736* 


1754* 


1798* 


1845* 


1664* 


1878* 


1960* 


1991* 


2039* 


2089* 


2119* 


2135* 


2154* 


2211* 


2256* 


2295* 


2421* 


2455* 


2488* 


2526* 


2557* 


2589* 


2624* 


2651* 


2684* 


2709* 


2855* 


2897* 


2931* 


3273* 


5198 


5201 


5204 


5207 


5210 


5213 


5227 


5230 


5233 


5236 


5239 












3600 


3617 


3671 


3677 














3598 


3614 


3638* 


3669 


3675 













3272* 
3720* 



3273 3278 



3410* 3640 



3*15 
3422 


3682 








3470* 
820* 
879* 

3720* 


3480 
824* 
985* 

3843* 


3515* 
830* 
1004* 
5197* 


834* 

1012* 
5242* 


839* 
1255* 
5243* 


8'iO 











844 845* 347* 849* 855 856* 858* 

i556 1570 1571 3187* 3206 3230 3337* 



ABS. 026720 



000 



ERRORS DETECTED: 0 

JKDIBO. JKDIBO/SOL/NL : TOC/CRF : SYM-SYSMAC . SML , JKDIBO.PU 
RUN-Tir€: 10 15 1 SECONDS 
RUN-TIME PATIO: 60/26-2.3 
CORE USED: 36K (72 PAGES) 
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